Найти сумму чисел от 3,5,7,9,11 ... 101 через паскаль. Помогите,пожалуйста)

0 голосов
30 просмотров

Найти сумму чисел от 3,5,7,9,11 ... 101 через паскаль. Помогите,пожалуйста)


Информатика (19 баллов) | 30 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Var
  i, s: integer;

begin
  s := 0;
  i := 3;
  while i <= 101 do<br>  begin
    s := s + i;
    i := i + 2
  end;
  Writeln('Сумма равна ', s)
end.

Тестовое решение:

Сумма равна 2600


(142k баллов)
0

спасибо огромное) я очень благодарна

0

Пожалуйста)