Dùng câu lệnh for do viết PT pascal in ra màn hình các số từ 1 đến 20 Đg cần gấp ai giúp mình vs ???? 16/07/2021 Bởi Adeline Dùng câu lệnh for do viết PT pascal in ra màn hình các số từ 1 đến 20 Đg cần gấp ai giúp mình vs ????
program bt; var i:byte begin writeln (‘cac so tu 1 toi 20’); for i:= 1 to 20 do writeln (i); readln end; vote cho minh 5 sao nha Bình luận
program bt;
var i:byte
begin
writeln (‘cac so tu 1 toi 20’);
for i:= 1 to 20 do
writeln (i);
readln
end;
vote cho minh 5 sao nha
var i: byte;
Begin
For i:=1 to 20 do write(i, ‘ ‘);
Readln
End.