Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
1DLove11
23.03.2020 19:46 •
Информатика
Ввести с клавиатуры 2 целых числа: m, n. если n ≤ m, то вывести 1, в противном случае — любое другое число. напишите программу в паскаль.
Показать ответ
Ответ:
олечк3
22.09.2020 01:48
Var
m, n: integer;
begin
readln(m, n);
if n <= m then
writeln(1)
else
begin
randomize;
writeln(random(50));
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Rybinchik
27.02.2022 14:08
Каков объем адресного пространства процессора? а) [tex]8 {}^{n} [/tex]б) [tex]16 {}^{n} [/tex]в) [tex]2 {}^{n} [/tex]г) [tex]4 {}^{n} [/tex]д) [tex]3 {}^{n} [/tex]...
leratolcynova
24.12.2020 14:29
Требования для создания интерфейса программы...
Ломастер254630
18.05.2020 13:50
палиндром нужно расшировать запись пример а роза упала на лапу азора слово читается в обратную сторону точно также как и в обычную...
Masha8157
06.12.2021 22:09
Написать программу: введите массив из 5 элементов случайным образом в интервале [10; 30] и сумму нечетных элементов....
sanya811
25.11.2020 16:29
Сколько байт в памяти занимает массив а, если на целое число отводится 2 байта? var a: array[1..6] of integer надо, хэлп...
daria2512
08.03.2023 07:05
Написать программу запрашивающую у пользователя ввести число и выводящую это число на экран...
Koteekanuha
09.07.2021 15:28
Соч по информатике писать сразу ответытоесть 1 сделали ответ. кинули. надо прям , буду безгранично...
mira133
15.08.2022 19:02
Объясните разницу между shift и caps lock...
YouAreMyWeakness
16.09.2021 20:27
Составьте блок-схему и программу на языке vba, которая вычисляет наибольший общий делитель двух целых чисел.( желательно через цикл for и что бы работало с отрицательными значениями)...
RomanenkoAA
16.03.2021 11:21
4. Упрости логическое выражениеAA(- А.В)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
m, n: integer;
begin
readln(m, n);
if n <= m then
writeln(1)
else
begin
randomize;
writeln(random(50));
end;
end.