Em hãy viết (gõ vào) lệnh đúng, chỗ dấu ….. (VIẾT CHỮ THƯỜNG)trong đoạn chương trình sau để viết ra màn hình 3 từ “chao cac ban” (không có dấu ngoặc kép)con trỏ xuống dòng mới sau khi viết. Program chao ; Uses crt ; Begin Clrscr ; ……………; End. *
Câu trả lời của bạ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.
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;
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.
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 ạ
program bang_nhan;
uses Crt;
var i,n:Integer
begin
clrscr;
n:=8;
for i:=1 to 10 do
WriteLn(n,'x',i:2,'=',n*i:3);
Readln
end.
cho em hỏi sai chỗ nào vậy
Program so_ sanh uses crt var A:B= integer; Begin clrscr; writeln ('Nhap so A:'); readln (B); if A>B then ; writeln (A,'lon hon,'B) else writeln (B,'lon hon ,'A); readln End