Аватар
Информатика, опубликовано 2018-08-22 22:17:03 by Гость

Написать программу с помощью цикла с постусловием (repeat). ПАСКАЛЬ Вычислить сумму чисел в диапазоне от 19 до 51, если они делятся на 5.

Аватар
Ответ оставил Гость

// Pascal
  var sum : integer;
      i: integer;
begin
  sum := 0;
  i := 19;
  repeat
    if i mod 5 = 0 then
      sum := sum + i;
    i := i + 1;
  until (i > 51);
  writeln(sum);
end.

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.