Viết chương trình đưa ra màn hình 2 câu: “Chào bạn. Bạn có khỏe không!”. In 5 lần lên màn hình.

2 câu trả lời

program ct;

Uses crt;

Var

         I:integer;

Begin

         clrscr;

         for i:=1 to 5 do writeln('Chao ban. Ban co khoe khong!');

         Readln;

End.

#HNgoc

uses crt;
var i:longint;
begin
clrscr;
for i := 1 to 5 do
 writeln('Chao ban. Ban co khoe khong!');
readln;
end. 

Câu hỏi trong lớp Xem thêm