BAI THUC HANH VE CAU LENH LAP WHILE DO

End;kt:=true;If N>2 thenBegind:=a[1]-a[2];i:=2;While (i<N)and(a[i]-a[i+1]=d) do inc(i);If i<>N then kt:=false;End;If kt then Write('Day a1,...,a',N,' lap thanh 1 cap so cong')Else Write('Day a1,...,a',N,' khong lap thanh 1 cap so cong');Readln;END9. P[r]

2/ CÁC BÀI TOÁN2/ CÁC BÀI TOÁN2/ CÁC BÀI TOÁN3/ CÂU LỆNH IF ĐỦ3/ CÂU LỆNH IF ĐỦ3/ CÂU LỆNH IF ĐỦ3/ CÂU LỆNH IF ĐỦ5/ VẬN DỤNG5/ VẬN DỤNG5/ VẬN DỤNG5/ VẬN DỤNG6/ CỦNG CỐ6/ CỦNG CỐ6/ CỦNG CỐ6/ CỦNG CỐ2. CẤU TRÚC LẶP WHILE2. CẤU TRÚC LẶP WHILE<BTĐK><BTĐK>1. BÀI[r]

CHÀO MỪNG Q THẦY CÔ VỀ DỰ CHUYÊN ĐỀ BÀI TẬP THỰC HÀNH WHILE – DO CHÀO MỪNG QUÝ THẦY CÔ VỀ DỰ CHUYÊN ĐỀ TRƯỜNG THCS LYÙ THÖÔØNG KIEÄT CHÀO MỪNG QUÝ THẦY CÔ VỀ DỰ CHUYÊN ĐỀ Viết câu lệnh If - Then (trong Pascal) thể hiện cấu trúc rẽ nhánh sau:Nếu ngày bằng 08 và tháng bằng 03 thì đưa ra màn h[r]

các bài tập kiểm môn toán lớp 11×bai tap ve cau truc lap tin hoc 11×bài giảng kiểu cấu trúc×

Từ khóa
bai tap ve cau truc tiep gian tiep lop 9bai tap chuyen cau truc tiep sang cau gian tiep lop 8bài tập chuyển câu trực tiếp sang gián tiếp lớp 9bài tập chuyển câu trực tiếp sang gián tiếp lớp 8bài tập[r]

Quan sát ví dụ sau:Quan sát ví dụ sau:ForFor i:=1 i:=1 ToTo 10 10 DoDo Writeln Writeln (lan lap thu,i)(lan lap thu,i);;Ví dụ 3: Program lap;Var i: Integer;BeginFor i:=1 to 10 do Writeln ( lan lap thu ,i); Readln;End.Ví dụ 4:Uses crt;Var i: Integer;Beginclrscr;