Có một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
Program Soam Soduong;
uses crt
var A, B: integer;
Begin
clrscr;
writeln(Nhap so A: );
readln(A);
if A > 0 then writeln(A,’ la so duong ‘);
else writeln(A,‘ la so am ’);
readln;
End.
“Nếu b chia 2 dư 1 thì in ra màn hình b la so le” được thể hiện câu lệnh trong Pascal như thế nào?
A. If b/2=1 then Write(‘b la so le’);
B. If b mod 2=1 then Writeln(b la so le);
C. If b mod 2=1 then Write(‘b la so le’);
D. If b div 2=1 then Write(‘b la so le’);
Em hãy xác định các câu lệnh sau đây đúng hay sai? Nếu sai hãy giải thích tại sao?
a) For i:=150 to 1 do writeln(‘A’);
b) For i:=1.5 to 30.5 do writeln(‘B’);
c) S:=0;n:=0; While S<=20 do begin n:=n+1;S:=S+n; end
d) Var X: array[10..1] of integer;
e) Var X: array[1,5...20,5] of integer;
f) Var X: array[1..30] of integer;
Câu 20: Điền một trong các điều kiện : (a mod b=0) (adivb = 0) , (a div b =0), (a > b) (a^ < b),(a=b) vào câu lệnh sau cho đúng?
A. If......... then write( 'a chia het cho b^ prime ) else write(^ / không chia hết cho b);
B. If......... then write( a lon hon b');
sao lại xóa của tui ;-;
Câu 1: Cú pháp lệnh của điều kiện dạng thiếu là :
A. If <Câu lệnh>; then <Điều kiện >
B. If <Điều kiện> then <Câu lệnh >;
C. If < Điều kiện 1> then <Điều kiện 2>
D. If < Câu lệnh 1>; then <Câu lệnh 2>;
Câu 2: Khai báo biến nào sau đây là sai:
A. Var a: real;
B. Var a,b: real;
C. Var a b: real;
D. Var a, b, c: real;
Câu 3: Cho a:= 2; b:= 3; Kết quả sau khi thực hiện câu lệnh dưới đây là: if a=b then writeln(‘a=b’) else writeln(‘a<>b’);
A. a>b
B. a=b
C. a<b
D. a<>b
Câu 4: Cách khai báo hằng nào sau đây là đúng:
A. Const pi:=3,14 real;
B. Const pi: 3,14;
C. Const pi=3,14 real;
D. Const pi=3.14;
Câu 5: Đâu là từ khóa trong ngôn ngữ lập trình Pascal?
A. Uses;
B. Hinh_tron;
C. End;
D. A và C.
Câu 6: Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal?
A. Lop 8A;
B. Tbc;
C. Begin
D. 8B.
Câu 7: Kết quảcủa phép toán 45 div 2 mod 3 + 1 là bao nhiêu?
A. 2.
B. 7;
C. 5;
D. 3;
Câu 8: Trong ngôn ngữ lập trình Pascal, câu lệnh khai báo nào sau đây đúng?
A. var a, b : integer;
B. var x = real;
C. const x := 5 ;
D. var thong bao : string.
Câu 9: Trong ngôn ngữ lập trình Pasal, câu lệnh gán nào sau đây đúng?
A. x := real;
B. y = a +b;
C. z := 3;
D. i = 4.
Câu 10: Xét chương trình sau:
Var x: integer;
Begin
x:=1;
y:= 5;
Writeln(x+y);
Readln;
End.
Kết quả của chương trình trên là:
A. 1
B. 5
C.6
D. Tất cả đều sai.
Câu 6: Cho biết kết quả in ra màn hình của đoạn chương trình sau
Câu a)
i := -1;
j:= 20;
For k:= 1 to 5 do
If k mod 2 = 0 then i:= i + 1;
j := j + i;
Writeln(i,‘ ’,j);
Câu b)
n := 127;
m := 0;
While n < >0 do
Begin
m := m * 10 + n mod 10;
n := n div 10;
end;
writeln(m);
Cho biết giá trị của a sau khi thực hiện câu lệnh: a:=3; if a>5 then a:=a+10;
A. a nhận giá trị là 13
B. a nhận giá trị là 3
C. Thông báo lỗi
D. Không hiện gì cả vì không có lệnh xuất ra màn hình.
Nếu điểm trung bình lớn hơn hoặc bằng 5 thì lên lớp ngược lại thì thi lại. Hãy chọn câu lệnh điều kiện đúng với mệnh đề trên.
A. if DTB >5 then writeln( ‘Len lop’) ;
B. if DTB < 5 then writeln( ‘ Thi lai’) ;
C. If DTB >=5 then writeln( ‘Len lop’) ; else then writeln( ‘ Thi lai’) ;
D. If DTB >=5 then writeln( ‘Len lop’) else then writeln( ‘ Thi lai’) ;
Viết chương trình nhập từ bàn phím hai số nguyên a và b khác nhau (a>b), sử dụng câu lệnh điều kiện để kiểm tra xem a chia het cho b hay không, thông báo ra màn hình.