Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
svetlana50036
26.07.2022 23:30 •
Информатика
Даны два числа a и b. проверить кратность их суммы квадратов числу c. (паскаль)
Ответ:
55752188
05.10.2020 11:03
Vara,b,c,d:integer;beginreadln(a);readln(b);readln(c);d:=(a+b)mod sqr(c);if d=0 then beginwriteln ('Кратно'); end else writeln ('Не кратно');end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Bjuv
07.02.2020 07:58
Плюсы и минусы программы Паскаль...
Anchoys777
16.10.2020 10:52
Принципы работы с программой Паскаль ...
physikman
02.11.2020 02:22
Восстановите цифры двоичных чисел, на месте которых в приведенном примере стоит знак * : 1*01+1**=10100 ответ запишите в формате: +ххх=10100 у. Аня кр быстрей ответ)...
olga638
26.02.2023 18:50
как нарисовать домик с ёлочкой в кумире (черепаха)...
leo00000
05.12.2021 23:38
Створи програму-калькулятор у Pascal. Ввести два числа (a i b), і код операції (kod). Використовуємо команду розгалуження: якщо kod =1 - рахуємо суму a+b якщо kod =2 -...
Стефанія2016
11.02.2022 01:27
для чего мы используем программы и ответить на вопрос Как запустить программы WavePad...
ivantretyak02
07.03.2020 00:14
Какие команды присваивания составлены правильно? A:=XA=X+2A=X6+X=:A...
володия
24.06.2020 04:48
Кумир, переместите робота из точки Н в точку К с использованием цикла со счётчиком Буду благодарна ...
Gamonga
23.08.2021 01:25
УМОЛЯЮ ЗАДАНИЕ ПРО РОБОТА (надо вставить только 2 слова) умоляю...
angelinakunda
21.09.2021 10:47
ИНФОРМАТИКА 5 КЛАСС . . . . . . ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?