Tham khảo :
- Phân biệt lệnh Write và Writeln:
+ Write: Viết câu lệnh trong dấu ngoặc.
+ Writeln: Viết câu lệnh trong dấu ngoặc rồi xuống đầu dòng tiếp theo.
- Phân biệt lệnh Read và Readln:
+ Read: Dừng lại để đọc.
+ Read: Dừng lại để đọc rồi xuống dòng.
giúp mk!!
Câu 1. Lệnh read(tên biến); /readln(tên biến); dùng để:
A. in ra màn hình B. gán giá trị cho biến
C. nhập dữ liệu vào từ bàn phím D. gán giá trị cho hằng
Câu 2. Trong Pascal, lệnh write/writeln dùng để:
A. nhập dữ liệu vào từ bàn phím B. gán giá trị cho hằng
C. gán giá trị cho biến D. in, thông báo ra màn hình
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.
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 So_Sanh;
usescrt;
var A, B= integer;
Begin
clrscr;
writeln(‘Nhap so A: ’); readln(A);
writeln(‘Nhap so B: ‘); readln(A);
if A <> B then writeln(A,’ khac ‘,B) else writeln(B,’ = ‘,A)
readln;
End.
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 So_Sanh
uses crt;
var A B: integer;
begin
clrscr;
writeln(‘Nhap so A: ’) readln(A);
writeln(‘Nhap so B, khac so A: ‘); readln(B);
if A :> B then writeln(A,’ lon hon ‘,B) else writeln(B,’ lon hon ‘,A);
readln;
end.
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 So_Sanh;
uses crt
var A: B= integer;
Begin
clrscr;
writeln(‘Nhap so A: ’);
readln(B);
writeln(‘Nhap so B, khac so A: ‘);
readln(B);
if A > B then; writeln(A,’ lon hon ‘,B) else writeln(B,’ lon hon ‘,A);
readln;
End.
mọi người giúp mình
Sửa lỗi chương trình sau
Program bang_cuu_chuong
Uses crt;
Var N: read;
i: integer;
Begin
clrscr;
write('Nhap so N=');readln(N);
writeln;
writeln('Bang nhan ',N)
writeln;
for i:=1 to 10 do
writeln(N,' x ',i:2,' = ',N')
readln
end.
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];
program Hello;
uses crt;
var
a: real;
b,c :integer;
begin
clrscr;
writeln (4+5);
read(a);
writeln (4+9);
read(b);
c:=(a+b)
writeln('Ket qua',c);
read(c);
readln;
end.
mọi người cho em hỏi em sai chỗ nào vậy ạ
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.
