Информатика, опубликовано 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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
