2 câu trả lời
Program Hotboy;
Uses crt;
Var s,i: longint;
Begin
Clrscr;
S:=1;
For i:=1 to 5 do
S:=S*i;
I:=i+1;
Write('tich la',S);
Readln
End.
uses crt;
var T, i: integer;
Begin
clrscr;
T:=1;
for i:=1 to 5 do T:=T*i;
writeln('Tich tu 1 toi 5 la: ', T:3);
readln;
End.
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
