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

Ответы:
Ануш Столяр
07-11-2014 17:01

// 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.

Тахмина Кравченко
07-11-2014 19:20

var a,b,c:integer;begina:=19;b:=0;repeatif (a mod 5 = 0) thenb:=a+b;a:=a+1;until (a>52);writeln(b);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя ЕВГЕНИЯ МЕЛЬНИК

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Написать программу с помощью цикла с постусловием (repeat). ПАСКАЛЬ Вычислить сумму чисел в диапазоне от 19 до 51, если они делятся на 5.» от пользователя ЕВГЕНИЯ МЕЛЬНИК в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!