Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
milerowskaya
03.10.2021 01:48 •
Информатика
Пользователь вводит целые числа. Пока он не введёт число большее 1717, в ответ на каждое введённое число выводите сумму этого числа и числа 88, если же введённое число больше 1717, то цикл необходимо завершить.
Ответ:
Jdhcb
26.01.2021 15:20
x:=0;
repeat
begin
readln(x);
writeln(x+88);
end;
until x<1718;
0,0
(0 оценок)
Популярные вопросы: Информатика
alpysovat
18.01.2022 04:29
1) Как называется этот элемент?...
bazhin789bazowzpsb
27.08.2020 02:44
1) Как называется этот элемент?...
мансур45
24.10.2021 01:21
1.Що таке графічний формат? Які графічні формати вам відомі? 2.Назвіть характеристики растрового зображення. 3.Який принцип подання зображення у векторних файлах? 4.Назвіть...
Эльвина567
03.07.2021 08:24
Напишите програму паскаль на нахождение площади квадрата...
raisa3yusif
04.03.2021 22:07
A := 4 b := 4 a := 2*a + 3*b b := a/2*b...
kem8
14.06.2022 07:47
Що таке байт? чому він дорівнюе?...
kucm14
04.03.2021 19:01
книга содержит 40 страниц, на каждой странице-50 строк, в каждой строке 25 символов. Какой объем информации содержит статья в мб?...
JanieMoor
21.09.2021 21:11
Книга содержит 20 страниц, на каждой странице-30 строк, в каждой строке 36 символов. 4 страницы из книг были оторваны. Какой объем информации содержит статья в КБ?...
Янрей
19.09.2020 05:52
что делать если после того как достал процессор и поменял ему термопасту не показывает изображение на мониторе?...
arcadig01
30.03.2020 01:58
Скласти програму знаходження суми всiх чисел кратних трьом вiд 10 до...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
x:=0;
repeat
begin
readln(x);
writeln(x+88);
end;
until x<1718;