Bài 7. Câu lệnh lặp
... lệnh>; to <giá trị cuối> do <câu lệnh>; Program Lap; Var i: integer; Begin For i:= 1 to 5 do Writeln(‘Day la lan lap thu:’, i); Readln End. Cấu trúc lặp đã được mô Cấu trúc lặp
Ngày tải lên: 14/06/2013, 01:27
Bài 7- câu lệnh lặp
... Chương trình sau sẽ in ra màn hình số lần lặp Program lap; Uses crt; Var i: integer; Begin For i:= 1 to 10 do Writeln (‘Day la lan lap thu ’,i); Readln end. 12345%6 12345%6 >PQRST ULF?@!9VLW ULF:@!9V"X I"WHMKYLFZ. Q[ > Quan ... máy? - U\]".?^!9VLW_!"8YLF...
Ngày tải lên: 16/09/2013, 04:10
... 10 Day la so lan lap thu 1 Day la so lan lap thu 2 Day la so lan lap thu 3 Day la so lan lap thu 4 Day la so lan lap thu 5 Day la so lan lap thu 6 Day la so lan lap thu 7 Day la so lan lap thu 8 Day ... lệnh2>; Vd: Ch¬ng tr×nh in ra mµn h×nh sè lÇn lÆp Program Lap; Uses crt; Var i: integer; Begin for i:=1 to 10 do writeln( Day la so lan lap thu ‘ ,i);‘ Readln; End....
Ngày tải lên: 27/11/2013, 14:11