... Có bao nhiêu số nguyên dương nhỏ hơn N chia hết cho 3? * Ch¬ng tr×nh lÆp tiÕn: Program Tong _lap_ tien; Uses crt; Var S : real; a, N : integer; BEGIN Clrscr ; Write(‘nhap so a = ’); Readln(a); ... lÖnh for-do * Ch¬ng tr×nh lÆp lïi: 2. LÆp víi sè lÇn biÕt tríc, C©u lÖnh for-do Program Tong _lap_ lïi; Uses crt; Var S : real; a, N : integer; BEGIN Clrscr ; Write(‘nhap so a = ’); Readl...
Ngày tải lên: 22/10/2013, 11:11
... nhiều câu lệnh thực hiện một phép tính nhất định. 11/ 27/ 13 Slide 9 Ví dụ 3. In ra màn hình thứ tự lần lặp Xem chương trình 11/ 27/ 13 Slide 7 3. Ví dụ về câu lệnh lặp - Câu lệnh lặp trong Pascal ... Đó là các câu lệnh lặp . 11/ 27/ 13 Slide 19 The End. 11/ 27/ 13 Slide 14 Ví dụ 6. Tính N! - N! là tích các số tự nhiên đầu tiên - Kí hiệu N! = 1.2.3.4.5 N 11/ 27/ 13 Slide 18 CÂU HỎI VÀ B...
Ngày tải lên: 27/11/2013, 15:11
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
... LỆNH LẶP Bài 7 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 ... \g? AULFHhY...
Ngày tải lên: 16/09/2013, 04:10
Bai 10. Cau truc lap (tiet 1)
... phạt trực nhật trong 7 ngày. Ví dụ 2: Học sinh B bị phạt trực nhật cho đến khi nào cô giáo thấy bạn có ý thức tốt thì mới không phải trực nhật nữa. ⇒ Ví dụ 1, phải trực nhật 7 ngày, ví dụ 2 không
Ngày tải lên: 17/10/2013, 06:11
Tài liệu bai 7: cau lenh lặp
... 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 la so lan lap thu 9 Day la so lan lap thu 10 G o o d ... ĐVị True False i:=1i:=2i:=3i:=4 i:=5 i:=7i:=8 i:=10 i:=9 2 <= 10 1 <= 10 3 <= 10 4 <= 10 i:=6 5 <= 10 6 <= 10 7 <= 10 8 <= 10 9 <= 10 10 &l...
Ngày tải lên: 27/11/2013, 14:11