Написать программу вычисляющие произведение чисел от 1 до 10

Написать программу вычисляющие произведение чисел от 1 до 10
Гость
Ответ(ы) на вопрос:
Гость
program z1; var i,p:integer; begin p:=1; for i:=1 to 10 do p:=p*i; writeln(p); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы