Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
erzhankenzhekan
03.09.2021 15:41 •
Информатика
Дано целое число n. нужно составить программу для определения, делится ли данное число на целое число m. составить программу плз 9 класс ,язык паскаль
Показать ответ
Ответ:
alina1922
29.07.2020 16:18
Var N,M:integer;
Begin
Write('N = ');ReadLn(N);
Write('M = ');ReadLn(M);
if N mod M = 0 then WriteLn(N,' кратно ',M)
else WriteLn(N,' не кратно ',M)
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
Princessa607
13.10.2020 21:56
Acmp. ru задача 1003 PYTHON ...
Solyankaya
24.01.2023 10:10
Составить алгоритм подсчета суммы s первых 1000 членов гармонии 1+1/2+1/3+1/+ 1/n используя цикл с предисловием нужна только блок схема...
Farxadkishi
16.06.2022 14:56
Итоговая Контрольная работа-2 вариант 8 класс ...
9955Х
24.11.2020 22:02
Расположите в порядке возрастания следующие величины, указывая в ответе их буквенные обозначения (например, БАГЕДВ): A) 47 битовБ) 6 байтов B) 4099 КбайтГ) 4 МбайтД) 11265...
dbnzgh
16.03.2022 06:08
1.что служит для отображения основных элементов графического интерфэйс ? 2. что обозначает компьютерный объект ? 3. что обеспечивать доступ ко всей информации, который хранится...
123451529
04.08.2021 10:00
My favourite TV programme is So Good . It is a food and drink programme. In the programme,Miss So taught cooking. The programme is about 1 hour long. After have dinner every...
Katzkotareva
31.07.2022 04:58
2 (Смотри пример №1) Даны целы числа x, y. Напиши код программы нахождения произведения этих чисел....
jixecizagjixeci
10.11.2021 12:34
90бет, 4-тапсырма.Өлеңді қайталап оқы. Болып кеткен іс-әрекетті және енді болатын іс-әрекетті білдіретін сөздерді тап. Найдите слова, которые описывают, что произошло и что...
hahafbdch
20.02.2021 22:37
5. 75. Comparative or superlative?1. April is (warm) than January2. August is the thot) month of the yeor3. November is (cold) than September4. It is the Cold) red in this...
апельсинкабарбариска
28.02.2020 14:45
1.1.Чему равна сила притяжения между шариками, имеющими заряд 10 Кл и – 15 Кл, находящимися на расстоянии 5 см....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Begin
Write('N = ');ReadLn(N);
Write('M = ');ReadLn(M);
if N mod M = 0 then WriteLn(N,' кратно ',M)
else WriteLn(N,' не кратно ',M)
End.