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

Напишите программу на Pascal в последовательности натуральных чисел найти сумму всех двухзначных чисел которые начинаются на 5. ввод чисел заканчиваются 0

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

Var a,s: integer;
begin
  repeat
    readln(a);
    if (a>9) and (a  until a = 0;
  writeln(s);
end.

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

Форма вопроса доступна на полной версии этой страницы.