1.viết cú pháp câu lệnh lặp với số lần biết trước và chương trình trước
Jup mk vs><
1.viết cú pháp câu lệnh lặp với số lần biết trước và chương trình trước Jup mk vs><
By Serenity
By Serenity
1.viết cú pháp câu lệnh lặp với số lần biết trước và chương trình trước
Jup mk vs><
Cú pháp: For <biến đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>
Cú pháp lệnh lặp với số lần biết trước
$\text{For (biến đếm):= (giá trị đầu) to (giá trị cuối) do (câu lệnh)}$
Ví dụ 1 bài có đủ dụng câu lệnh này
Uses crt;
Var P,n,i : real;
Begin
Clrscr;
P:=1;
Write(‘nhap so n’);
Readln(n);
For i:= 1 to n do
P:=P*i;
I:=i+2;
Writeln(‘tich P la’,P);
Readln
End.