Сpascal
составте программу находящую сумму целых отрицательных нечетных чисел из промежутка от а до в

alyabevan02001 alyabevan02001    1   20.10.2019 07:55    0

Ответы
lahtina195454 lahtina195454  10.10.2020 08:20

var a,b,s,i: integer;

begin

readln(a,b);

s:=0;

if b<a then write('неверный ввод')

else begin

for i:=a to b do

if (i<0) and (abs(i) mod 2<>0) then s:=s+i;

write('сумма целых отрицательных нечетных чисел на [',a,';',b,']: ',s);

end;

end.

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