Quảng cáo
2 câu trả lời 466
4 năm trước
Program Tinhsotunhien; Uses Crt; Var i, Tich: longint; Begin Clrscr; Tich:=1; i:=1; While Tich <= 100 do Begin Tich:=Tich*i; End; Writeln('Ket qua',Tich); Readln; End.
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK1 44256
-
Hỏi từ APP VIETJACK24640
-
Hỏi từ APP VIETJACK21086
Gửi báo cáo thành công!