Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Саидос
21.07.2020 01:58 •
Информатика
Введите два числа a, b. выведите на экран порядковый номер меньшего из них .
Ответ:
suyargklova
10.07.2020 11:17
Program z1;
var a,b:longint;
begin
read(a,b);
if a<b then write(1) else write(2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
darkilia2006p01bb5
09.10.2020 14:02
Выбери программы для распознавания текста. RiDoc ABBYY FineReader Inkscape MS Word...
tikmehr
09.02.2022 12:05
Написать программу на языке паскаль...
rfgvgvvdrxxsegb
31.05.2021 23:46
Свыбором ответа: определи значения переменных a и b после выполнения фрагмента алгоритма a : =6*12+3 b : =(a div 10)+5 a : =(b mod 10)+1 1) 3, 12 2) 5,10 3) 2, 17 4) 10, 5...
Volk218
31.01.2023 07:44
Выполните алгоритм для заданных чисел x 9 y 14...
yyydomayyy
02.05.2020 18:12
Двумерный массив. решить или киньте источники, где показаны решения. я в отчаянии, только пришла, а тут сразу такое....
TMuhriddin
14.06.2022 06:16
Верно ли, что 150 мегабайт равны 1527825425 байт? ...
Ольга25052000
12.05.2020 00:14
Записать логическую функцию, составить таблицу истинности....
Nurlan2010
24.06.2020 21:23
37 нужно решитьэто информатикарешить нужно с циклического алгоритма (блок-схемы) нужно...
vadimrusackeviVadim
04.02.2021 00:11
Напишите программу, которая будет подсчитывать количество отрицательных и положительных введённых чисел с клавиатуры, подсчёт вести до тех пор пока не будет введён 0...
VovkaGamer228
15.08.2022 09:55
Написать программу снежинки в pascalabc.net нужна только 1 снежинка определенного размера, из определенного места (без команды random! ) размеры снежинки выбирайте какие хотите...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,b:longint;
begin
read(a,b);
if a<b then write(1) else write(2);
end.