Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
andrew120885p09zsu
18.10.2022 06:24 •
Информатика
Составить программу нахождения наибольшего из трёх чисел и проверить кратно ли это число трём в паскале авс
Ответ:
Fenix0x
09.10.2020 03:00
begin
var Max := ReadSeqInteger(3).Max;
Print(Max, Max mod 3 = 0)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
pollypron
14.01.2022 15:36
Написать схему и алгоритм для вычесления суммы трехзначных чисел с while...
straikerfba
12.06.2020 14:32
Язык кода Python. Игра «Компьютер угадывает число» Поменяйте мальчика и компьютер из задачи местами. Теперь мальчик загадывает число между 1 и 100 (включительно). Компьютер...
23050309
24.01.2022 12:37
ответ уже есть но он не работает.. Складіть проект, у якому виконавець, поки він не доторкнеться до межі, буде повторювати такі дії: рухатися вгору та повідомляти деяке повідомлення,...
nikolayAK
06.05.2023 11:36
Пользователь вводит с клавиатуры числа. Программа должна подсчитывать сумму, максимум и минимум,введенных чисел. Когда пользователь вводит число 0программа прекращает свою работу...
НИкитос1757
27.05.2020 11:57
.Електронна пошта. Сервери для реєстрації поштової скриньки (перерахувати). Складові адреси поштової скриньки....
оки8
25.10.2022 04:21
Пишет есть доступ к интернету а сайт не грущит,в хроме пишет не удалось получить доступ к сайту...
botan2008
25.12.2022 14:19
Как разобрать по составу слово понимание?...
Антонио789176
18.01.2023 18:45
Определите молярную массу и масмовые доли элементов с соединением mn(no2)^2...
Furum
18.01.2023 18:45
Іть с питанням : за якими ознаками представників типу кишковопорожнинні можна віднести до нижчих багатоклітинних тварин....
badmaks00
18.01.2023 18:45
Сделайте синтаксический разбор предложения, . проснувшись поутру довольно поздно, я увидел, что буря утихла....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var Max := ReadSeqInteger(3).Max;
Print(Max, Max mod 3 = 0)
end.