Предмет: Информатика, автор: ksi101

Обчислити суму непарних чисел від 50 до 100 за допомогою операторів циклу


Леганда555: на якій мові програмування?
ksi101: Паскаль

Ответы

Автор ответа: Леганда555
1

var

 sum, i: Integer;

begin

 sum := 0;

 i := 51;

 while i < 100 do begin

   sum := sum + i;

   i := i + 2;

 end;

 WriteLn(sum);

end.  

Похожие вопросы
Предмет: Математика, автор: maxcss16