Помогите пожалуйста,срочно!!!! тема" циклы в паскале" найти произведение 5 чисел вводимых с клавиатуры
Помогите пожалуйста,срочно!!!!
тема" циклы в паскале"
найти произведение 5 чисел вводимых с клавиатуры
Гость
Ответ(ы) на вопрос:
ГостьПрограмма, которая выводит произведение чисел от 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.
Не нашли ответ?
Похожие вопросы