Скласти програму для обчислення значення виразу G=50+48+46...+2
Скласти програму для обчислення значення виразу G=50+48+46...+2
Гость
Ответ(ы) на вопрос:
Гостьvar
i, g: integer;
begin
for i := 50 downto 2 do
if i mod 2 = 0 then g := g + i;
writeln(g);
end.
Не нашли ответ?
Похожие вопросы