Составить программу , которая вычесляет произведение сумму первых 137 натуральных чесел (параметром цикла является переменная а, а произведение хранится в переменой p)
плиз решите я на уроке сижу!!!
2 комментария:
Вы просите сумму, пишете о произведении...
Хотяюююю вы и произведение упомянули...
Вы просите сумму, пишете о произведении...
Хотяюююю вы и произведение упомянули... Ответы
Гость Var a,p:integer;
begin
p:=1;
for a:=1 to 137 do p:=p*a;
writeln(p);
end.
Нет комментариев
Похожие вопросы
Информатика
Определить кратно ли число 3 в Pascal, Если не кратно то умножить на 10, если кратно то разделить на 3...
Информатика
Определить кратно ли число 3 в Pascal, Если не кратно то умножить на 10, если кратно то разделить на 3...
Информатика
Срочно, помогите пожалуйста...
Информатика
Помогите решить, очень надо...
Список предметов
