составить программу на Pascal ABC. Составить программу которая вычисляет сумму всех нечетных и кол-во четных чисел от 10 до 99

Есть ответ
18.12.2022
172

Ответ


Program n1;Uses CRT;Const n=7;Var i,k,s: integer;beginfor i:=10 to 99 do if i mod 2=1 then s:=s+i else k:=k+1;writeln('Summa nechetnyx =',s,' a chetnih chisel ',k);readlnend.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
18.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.