Составить программу для нахождения суммы всех нечетных целых чисел от 11 до 83

АндрейЯсийчук АндрейЯсийчук    3   16.08.2019 05:40    0

Ответы
Mehribonim Mehribonim  20.08.2020 09:29
Var i,n: integer;
Begin
n:=0;
for i:= 11 to 83 do
if i mod 2=0 then n:=n
else 
begin 
n:=n+i;
WriteLn('i=', i);
end;
Write ('sum=',n);
end. 
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика