K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

21 tháng 10 2016

Chưa chắc giống nhau nhưng tham khảo :

Câu 1 : Viết các phép tính sau trong pascal :

a) \(\frac{\sqrt{p\left(p-a\right)\left(p-b\right)^2}}{p-c}\)

b) \(a^2+b^2-5ab-\frac{43}{3}\)

c) \(\sqrt{2}+\frac{\sqrt{s+p+c}}{\sqrt{2}}\)

Câu 2 :

Viết chương trình tính diện tích và chu vi hình chữ nhật biết chiều dài và chiều rộng nhập từ bàn phím.

Câu 3 :

Viết chương trình tính diện tích hình tròn biết bán kính được nhập từ bàn phím.

 

7 tháng 10 2016

Mik thực hành thôi bạn

Mọi người làm hộ em ạ                                  ĐỀ CƯƠNG ÔN TẬP TIN HỌC 8 KÌ II                                             Năm học 2020 - 2021I. LÝ THUYẾT  Chọn đáp án đúng trong các đáp án sau.1. Trong Pascal vòng lặp nào sau là vòng lặp có bước lặp xác định (biết trước).A. While … do                                                          B. Repeat … Until               C. For .. to .....
Đọc tiếp

Mọi người làm hộ em ạ

                                  ĐỀ CƯƠNG ÔN TẬP TIN HỌC 8 KÌ II

                                             Năm học 2020 - 2021

I. LÝ THUYẾT

 Chọn đáp án đúng trong các đáp án sau.

1. Trong Pascal vòng lặp nào sau là vòng lặp có bước lặp xác định (biết trước).

A. While … do                                                          B. Repeat … Until               

C. For .. to .. do                                                         D. Case.. of

2. Phương án nào dưới đây là khai báo mảng hợp lệ ?

A. mang : array[0..10] of integer;                          B. mang : array[0..10] : integer;

C. mang : integer of array[0..10];                           D. mang : array(0..10) : integer;

3. Cho khai báo sau :

a : array[0..16] of integer ;

Câu lệnh nào dưới đây sẽ in ra tất cả các phần tử của mảng trên ?

A. for k := 1 to 16 do write(a[k]);                          B. for k := 16 downto 0 do write(a[k]);

C. for k:= 0 to 15 do write(a[k]);                           D. for k := 16 down to 0 write(a[k]);

4. Cho khai báo sau:

Var a : array[0..10] of integer ;

Phương án nào dưới đây chỉ phần tử thứ 10 của mảng ?

A. a[10];                                 B. a(10);                     C. a[9];                       D. a(9);

5. Chọn khai báo đúng:

A. Var A: array[1..10] of integer;                          B. Var A= array[1..10] of integer;

C. Var A:= array[1..10] of integer;                        D. Var A: array[1,10] of integer;

6. Cho khai báo:  Var a : array[0..50] of real;  và đoạn chương trình:

k := 0 ;

for i := 1 to 50 do

            if a[i] < a[k] then k := i ;

Đoạn chương trình trên thực hiện công việc gì dưới đây ?

A.Tìm phần tử nhỏ nhất trong mảng;

B.Tìm phần tử lớn nhất trong mảng;

C.Tìm chỉ số của phần tử lớn nhất trong mảng;

D.Tìm chỉ số của phần tử nhỏ nhất trong mảng;

7. Cho S va i là biến nguyên. Khi chạy đoạn chương trình:

            S:=0;

            For i:=1 to 10 do s:=s+i;

            Writeln(s);

Kết quả in lên màn hình là:

A. s=11                                  B. s=55                                   C. s=100                    D. s=101

8.  Câu lệnh cho phép ta nhập giá trị của a từ bàn phím là:

            A. readln(a);                                                 B. Writeln(a);           

C. Write(‘nhap gia tri cua a:’);                               D. Write(a);

9. Câu lệnh lặp với số lần chưa biết trước bắt đầu bằng từ khóa:

A. For                         B. While                                 C. If                             D. Var

10. Cho S và i là biến nguyên. Khi chạy đoạn chương trình :

          s:=0;

          for i:=1 to 3 do s := s + i;

          writeln(s);

    Kết quả in lên màn hình của S là :

A.  6

B.  3

C.  0

D.  5

11. Khai báo biến kiểu mảng nào sau đây là hợp lệ:

A. Var A: array[1.5..10.5] of real;                         B. Var A: array[1…N] of real;

C. Var A: array[100..1] of integer;                                    D. Var A: array[1..50] of integer;

12. Khi chạy chương trình:

Var S, i, j: Integer;

Begin

S:=0;

for i:= 1 to 3 do

for j:= 1 to 4 do S:=S+1;

End.

Giá trị sau cùng của S là:

A. 4                             B. 3                             C. 12                           D. 0

13. Một số kiểu dữ liệu trong passcal:

  A. Integer, real, byte, char…

B. Writeln, readln, integer, begin...

  C. For, while, array, to…

D. While, do, real…

14. Câu lệnh lặp while…do nào dưới đây là đúng:

A. While i:=10 do S := S+1/i;                                 B. While i > 1 do S = S+1/i;

C. While 10 do S := S+1/i;                                      D. While i do S = S+1/i;

15. Cho khai báo:  Var a : array[0..50] of real ;    và đoạn chương trình

k := 0 ;

for i := 1 to 50 do

            if a[i] > a[k] then k := i ;

Đoạn chương trình trên thực hiện công việc gì dưới đây ?

A. Tìm phần tử nhỏ nhất trong mảng;

B. Tìm phần tử lớn nhất trong mảng;

C. Tìm chỉ số của phần tử lớn nhất trong mảng;

D. Tìm chỉ số của phần tử nhỏ nhất trong mảng;

II. TỰ LUẬN

Câu 1. Viết chương trình nhập n số nguyên từ bàn phím, in dãy số nguyên đó ra màn hình và tìm giá trị lớn nhất trong dãy.

Câu 2. Viết chương trình nhập n số nguyên từ bàn phím, in dãy số nguyên đó ra màn hình và tìm giá trị nhỏ nhất trong dãy.

Câu 3. Viết chương trình nhập một dãy gồm n số thực từ bàn phím. Tính tổng và trung bình cộng các số đó. In kết quả tính được ra màn hình.

Câu 4. Viết chương trình nhập một dãy gồm n số nguyên từ bàn phím, đếm xem có trong đó có bao nhiêu số là số chẵn. Tính tổng các số chẵn đó. In kết quả tính được ra màn hình.

12

I: Trắc nghiệm

Câu 1:C

Câu 2: A

Câu 3: B

Câu 4: A

11 tháng 5 2018

Mới thi thực hành thôi Nguyễn Minh Huyền ơiiiii

11 tháng 5 2018

ẹc, mai mình thi lí thuyết cơ

Đề thi HSG Tin 8 năm học 09-10 (Quế Sơn) - Tin học 8 - Lê Nho Duyệt ...

Trên mạng nhiều lắm bn