viết chương trình đầy đủ in ra màn hình 5 lần dòng chung tay chong dich ,số lần nhập từ bàn phím

2 câu trả lời

program oken;
uses crt;
var i,n: integer;
begin
        clrscr;
        write('nhap so lan lap: '); readln(n);
        for i:=1 to n do
                writeln('Chung tay chong dich');
        readln;
end.

Program BTH;
uses crt;
var i,n:longint;
Begin
        clrscr;
        write('Nhap so lan lap: ');readln(n);
        For i:=1 to n do
                writeln('Chung tay chong dich');
        readln;
end.

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