Написать цикл do while в котором к заданному числу прибавляется 10 до тех пор, пока сумма не станет больше 1000
Ответы:
24-02-2019 08:46
//Pascal ABC.NET 3.1 сборка 1219 Var a:integer; begin readln(a); while (a<=1000) do a:=a+10; writeln(a); end. Пример ввода: 567 Пример вывода: 1007
Также наши пользователи интересуются:
Обратить обыкновенную дробь в десятичную. Обратить чистую переодическую десятичную дробь в обыкновенную 5,(063) Обратить смешанную переодическую десятичную дробь в обыкнов Вычислите sina, cosa и tga если tg a/2=2/3
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Написать цикл do while в котором к заданному числу прибавляется 10 до тех пор, пока сумма не станет больше 1000 » от пользователя Диляра Потапенко в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!