Предмет: Информатика,
автор: VednajaRedicka
ПОМОГИТЕ, СРОЧНО!!!! составить алгоритм нахождения суммы и произведения чисел от 20 до 150
Ответы
Автор ответа:
0
число номер 50-100____
Автор ответа:
0
составить алгоритм нахождения суммы и произведения чисел от 20 до 150
var k,i:integer;sum:longint;P:double;Beginp:=1;for i:=20 to 150 do beginp:= p * i;sum:= sum + i;end;writeln;writeln('произведение чисел = ',p);writeln('сумму чисел = ',sum)end.
var k,i:integer;sum:longint;P:double;Beginp:=1;for i:=20 to 150 do beginp:= p * i;sum:= sum + i;end;writeln;writeln('произведение чисел = ',p);writeln('сумму чисел = ',sum)end.
Похожие вопросы
Предмет: Информатика,
автор: userneermin
Предмет: История,
автор: arinasirazieva2
Предмет: Математика,
автор: logile8325
Предмет: Химия,
автор: черный7генерал