помогите пожалуйста,срочно!!!!
тема" циклы в паскале"
найти произведение 5 чисел вводимых с клавиатуры
Ответы
Ответ дал:
0
Программа, которая выводит произведение чисел от 1 до 5...
program sicl11;
var i, p: integer;
begin
p:=1;
for i:=1 to 5 do p := p * i;
write('Произведение чисел от 1 до 5 равно ', p);
readln;
end.
program sicl11;
var i, p: integer;
begin
p:=1;
for i:=1 to 5 do p := p * i;
write('Произведение чисел от 1 до 5 равно ', p);
readln;
end.
Ответ дал:
0
спасибо большое!:3
Ответ дал:
0
Да не за что!
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад