Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Аня98788
30.01.2023 23:01 •
Информатика
Определить первое целое число после 145, которое делиться на 13 и 23. в паскаль
Показать ответ
Ответ:
VikaTomaRetaSasha
03.10.2020 04:30
Var x:integer;
begin
x:=145;
repeat
x:=x+1;
until (x mod 13=0) and (x mod 23=0);
writeln(x);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
topova1
26.05.2020 17:48
Inkscape редакторы туралы қандай түсiнiк алдың...
olykharkov
27.08.2020 12:49
Формальне виконання означає, що виконавець під час розв язування задачі має...
njvbyf04Юля
12.05.2021 07:18
В алгоритме, записанном ниже, используются переменные a и b. Символ «:=» обо-значает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно опера-ции сложения,...
Portée
26.07.2022 00:44
Подберите дерево кодов под распределение частот. A=5 B=3 C=3 D=2 E=2 A=6 B=3 C=3 D=2 E=2 A=5 B=4 C=2 D=2...
veranika25
07.02.2022 19:22
Сколько разрядов двоичного кода нужно для кодирования алфавита Из 10 буквИз 15 буквИз 33 буквИз 7 буквИз 30 букв...
2Hello3
05.05.2020 09:48
Scratch программасының қандай мүмкіндіктері бар? Сахна фонын қалай ауыстырамыз? Тiзiм қалай жасалады?...
Aigulshak
11.02.2020 07:56
Python. integer 22. С начала суток секунд (N — целое). Найти количество се-кунд с начала последнего часа. Python. Integer 23.С начала суток секунд (N — целое). Найти...
egoyan222
11.04.2020 08:19
оз эмоцияларын баскаруга кабылетсыздыгы унемы киял алемыне енуге умтылысы ересектер мен балаларда нежные дауна украл етеды...
katyusha1514111
14.03.2021 20:07
Нужно написать 2 программы pascal 1. Дан одномерный массив из 20 элементов, массив заполнен случайными числами от -50 до 50. Вывести на экран все отрицательные элементы...
alenaFox457
02.05.2023 23:44
Задачи по информатике 7 кл!! ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
x:=145;
repeat
x:=x+1;
until (x mod 13=0) and (x mod 23=0);
writeln(x);
end.