writeln('chao cac ban');
readln;
Đúng 1
Bình luận (0)
Các câu hỏi tương tự
Em hãy viết(gõ vào) phần trả lời từ khóa đúng để bổ sung vào chỗ (viết chữ thường) còn thiếu, chỗ dấu … trong đoạn lệnh sau: Program baitap ; Uses crt ; …… Clrscr ; Writeln(‘Pascal’); End. *
Dưới đây là một chương trình viết trong Pascal: program CT_dau_tien; uses crt; begin writeln(‘ Chao cac ban’); readln; end. *
Program là từ khóa;
Program là tên;
CT_dau_tien là từ khóa;
CT_dau_tien là tên;
begin là từ khóa;
begin là tên;
writeln là từ khóa;
writeln là tên;
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.
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.
Cho đoạn chương trình sau:
n:=1;
While n<10 do
Begin
n:=n+1;
Writeln(‘ xin chao’);
end;
Khi thực hiện chương trình câu “ xin chao” được viết ra màn hình mấy lần?
A. 0
B.10
C. 9
D. Vòng lặp vô tận.
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.
Lệnh print() dùng để
A. Không đưa con trỏ xuống đầu dòng tiếp theo
B. Đưa con trỏ xuống đầu dòng tiếp theo
C. Bỏ trong dấu ngoặc đơn
D. Bỏ trong dấu ngoặc kép
Cho đoạn chương trình sau:
N:=0;
While N>0 do
Begin
N:=N+1;
Writeln('Xin chao');
End
Khi thực hiện chương trình,câu "Xin chao" được viết ra màn hình mấy lần?
A.10 B.9
C.0 D.Vòng lặp vô tận