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;
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
Tìm và sửa chương trình này thành một đoạn chương trình hoàn chỉnh Program NHOM_PPT Uses crt Begin Writenln ('Nhom chung minh Phan,My,Minh') Writeln ('chuc cac ban hoc tot') Readln End
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.
Hãy tìm lỗi của chương trình và sửa lại cho đúng program Chuong_trinh uses crt; var a,b,c:=integer begin writeln('Nhap vao so a va b') readln(a,b) c:=a+b writeln('Ket qua :',c 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.
Phân biệt từ khóa và tên trong chương trình:
Program Chương trình- đầu tiên
uses Crt
Begin
Wrieln ('chao cac ban' )
End
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.
Cho đoạn chương trình sau. Em hãy tìm lỗi sai và sửa lại, sắp xếp cho đúng?
Tính giá trị biểu thức: 12.x – 30 + 12
Uses CRT:
Clrscr.
Begin
Writeln(‘Gia tri bieu thuc 12.x – 30 + 12 = ’ , 12 *x – 30 + 12: 5:3)
Program Tinh _gia_tri_bieu_thuc;
Var x: Real;
Write(‘Nhap gia tri x: ’); readln(x);
Readln;
End.