Программа с числом 101 паскаль

TatarskayaGreckha TatarskayaGreckha    3   13.04.2020 09:25    1

Ответы
RonaAnna RonaAnna  13.10.2020 03:37

uses crt;

var sum,i:integer;

begin

sum:=0;

for i:=101 to 301 do begin

if i mod 2=0 then sum:=sum+i;

end;

writeln('Cумма нечётных элементов=  ',sum);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика