Luyen tap ve cau lenh lap For do

... i:=5 i=i+1; P:=P*i; i=11? S Đ Lưu đồ P:=1; For i:=6 to 20 do p:=p*i; Writeln(‘Tich can tinh la:’,p); Program vong _FOR; Uses Crt; Var i,j:Integer; BEGIN Clrscr; For i:= 1 to 9 do For j:=0 to 9 do begin write(i,j,‘ ... với mỗi i For i:=1 to 9 do for j:=0 to 9 do Begin write(i,j,‘ ’); writeln; End; Program tich_cac_so; Uses Crt; Var i: Integer; p: Longint; BEGIN Cl...

Ngày tải lên: 17/07/2014, 07:00

... có gì thắc mắc có thể hỏi GV. • HĐ CỦA GV • HĐ CỦA HS GHI BẢNG For& lt;biến đếm>:=<giá trị đầu>to<giá trị cuối> ;do& lt;câu lệnh>; • -Kết thúc phần bài tập trong SGK GV cho ... hình 3 câu:Chào các bạn! có số thứ tự đứng trước các câu. Program VD; i: Integer; Begin For i:=1 to 3 do Writeln(i,’→’,’Chao cac ban’); Readln; End. • HĐ CỦA GV • HĐ CỦA HS • GHI BẢNG •...

Ngày tải lên: 01/07/2013, 01:25

... for <biến đếm> := <giá trị đầu> for <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>; to <giá trị cuối> do <câu lệnh>; Program Lap; Var ... lệnh for do trong một số tình huống đơn giản; - Hiểu cách viết đúng các quy tắc, cú pháp trong ngôn ngữ cụ thể khi dùng vòng lặp for; - Đọc hiểu được chương trình có sử dụn...

Ngày tải lên: 06/08/2013, 01:26

... sai ở các câu mà em cho rằng sai. a. For i:=1 to 10; do x:=x+1; b. For i:=10 to 1 do x:=x+1; c. For i:=1 to 10 do x:=x+1; d. For i:=1 to 10 for j:=1 to 10 do x:=x+1; Sau khi thực hiện đoạn chương ... câu lệnh lặp.  Cú pháp câu lệnh lặp: For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>;  Trong đó:  For, to, do là các t...

Ngày tải lên: 01/12/2013, 03:11

Ngày tải lên: 21/01/2014, 03:20

Ngày tải lên: 26/01/2014, 01:20

Ngày tải lên: 26/01/2014, 01:20

Ngày tải lên: 20/06/2014, 12:20

... (id>1)and(a[id-1,j0]=a[i0,j0]) do dec(id); While (ic<n)and(a[ic+1,j0]=a[i0,j0]) do inc(ic); d:=id; c:=ic; cd:=1; For id:=i0 downto d do For ic:=i0 to c do Begin jd:=j0; jc:=j0; End; writeln(' ... readln(n);a[1]:=1; a[2]:=1; if (n>2) then for i:=3 to n do if (odd(i)) then a[i]:=a[i-1]+1 else begin a[i]:=0; for j:=1 to (i-1) do a[i]:=a[i]+a[j]; end; writeln(&ap...

Ngày tải lên: 07/06/2013, 01:25

... viết viết lại chương trình này. {| 1. Viết lại cú pháp và cho biết ý nghĩa vòng lặp For ….To… .Do . ? 3. Trắc nghiệm 2. So sánh cú pháp 2 vòng lặp ? 1<=12 i := 11 Đây là tháng 11

Ngày tải lên: 26/06/2013, 01:26