1) Gán biến x giá trị là 9
2) Gán biến x giá trị bằng của x hiện tại thêm 1 đơn vị
3) In ra màn hình từ "tong" =)))
4) Nhập giá trị biến của a từ bàn phím
2.Cho biết ý nghĩa các câu lệnh trong chương trình sau:
Progam HINH_VUONG;
uses crt;
Var canh:real;
Begin
clrssr;
Write(‘nhap do dai canh:’);readln(canh);
Writeln(‘Chu vi hinh vuong la:’,4*canh:10:2);
Writeln(‘Dien tich hinh vuong la:’canh*canh:10:2);
readln
end.
Đọc và sửa sai các lỗi trong chương trình Pascal sau (1điểm)
Brogram Bai 1;
Uses crt ;
Var x, y = integer
Begin
Write(‘nhap vao gia tri cua x : ‘, ‘x=’) ;
Readln(x);
Write(‘nhap vao gia tri cua y : ‘, ‘y=’) ;
Readln();
Write(‘tong cua hai so x va y la:’, x+y) ;
Readln
end
Cho biết kết quả sau khi thực hiện câu lệnh: x:=3; y:=7; if (x+y) mod 2=0 then write(‘tong chan’) else write(‘tong le’);
A. Thông báo lỗi
B. Tong chan
C. Tong le
D. Tùy trường hợp sẽ thông báo tổng chẵn hay tổng lẻ
Câu 6: Trong đoạn chương trình sau, có mấy câu lệnh được lặp lại?
S := 0; dem := 0; n := 10;
While dem > n do
Begin
dem := dem +1;
Write(‘ Nhap so X’,dem,’=’);Readln(X);
S := S + X ;
end;
A. 0 B. 1 C. 3 D. 4
ét o ét bà con cô chú ơi ét o ét, ét o ét é é é é é
Đọc và sửa sai các lỗi trong chương trình Pascal sau
Brogram Bai 1;
Uses crt ;
Var x, y = integer
Begin
Write(‘nhap vao gia tri cua x : ‘, ‘x=’) ;
Readln(x);
Write(‘nhap vao gia tri cua y : ‘, ‘y=’) ;
Readln();
Write(‘tong cua hai so x va y la:’, x+y) ;
Readln
end
Cho biết chức năng của lệnh for i:=1 to n do begin write('A[',i,']=') readln(A[i]); end;
uses crt; var i,S:Integer; begin clrscr; (1) for i:=1 to 50 do (2) if (i mod 2=0) then S:=S+i; (3) writeln('S=',S); (4) readln; (5) end. CÂU HỎI: a) Chương trình trên đang thực hiện công việc gì ? b) Cho biết ý nghĩa của câu lệnh (3),(4),(5).
1.Lệnh Writeln(453.123:5:2); cho kết quả trên màn hình là:
A.453.123
B.453.12
C.453.1
D.453
2.Lệnh Readln là lệnh:
A.Tạm ngừng chương trình.
B. Tạm ngừng chương trình chờ nhấn phím Enter.
C.Tạm ngừng chương trình trong x/1000 giây
D.Nếu lệnh Readln đặt trước End, thì nó là lệnh dừng màn hình để xem kết quả.
3. Lệnh Writeln(453.123:5:2); cho kết quả trên màn hình là:
A. Kết quả được hiển thị trong 10 ô tính từ bên phải sang.
B. Kết quả được hiển thị trong 5 ô tính từ bên phải sang.
C. Kết quả được hiển thị trong 2 ô tính từ bên phải sang.
D. Kết quả được hiển thị trong 12 ô tính từ bên phải sang.
câu 20 : trong các lệnh dưới đây , lệnh nào chưa chính xác A.write('nhap so phan tu n='); readln (n); B.write(A[',i,']=); readln (A[i]); C. write ('A[',i,']='); readln (A[i]; D. max :=A[i];
