Viết chương trình tính tích các số tự nhiên từ 5 đến 50
Quảng cáo
1 câu trả lời 2300
3 năm trước
Begin
s:=1;
for i:=1 to 50 do
begin;
write ('nhap so hag thu',i);
read(a);
s:=s x a;
end;
writeln('ket qua: ',s);
readln;
end.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
4197
Gửi báo cáo thành công!
