Предмет: Информатика,
автор: nikitaalekseev5
Составьте программу вычисления произведения четных чисел от 8 до 32
Ответы
Автор ответа:
0
Program n1;
var p: real;
i: integer;
begin
p:=1;
for i:=8 to 32 do if i mod 2=0 then p:=p*i;
writeln(p);
end.
var p: real;
i: integer;
begin
p:=1;
for i:=8 to 32 do if i mod 2=0 then p:=p*i;
writeln(p);
end.
Похожие вопросы
Предмет: Химия,
автор: vasjalusjco
Предмет: Геометрия,
автор: torilifedubai
Предмет: Алгебра,
автор: Аноним
Предмет: Обществознание,
автор: Лупастая
Предмет: Алгебра,
автор: викавикавикамалая