Question

помогите пожалуйста,срочно!!!!
тема" циклы в паскале"
найти произведение 5 чисел вводимых с клавиатуры

Answer 1

Программа, которая выводит произведение чисел от 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.

Answer 2

спасибо большое!:3

Answer 3

Да не за что!