Написать программу получения ряда чисел в диапазоне - вопрос №7697334100 от Bogqwerty 09.08.2021 23:04

Question

Информатика: Написать программу получения ряда чисел в диапазоне до 100.распечатать из них только четные.

Bogqwerty · Answer

Var i, s: integer; begin s:=0; for i:=1 to 100 do if (i mod 2 0) then s:=s+i; end;...