Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
OnePlus007
03.07.2022 18:50 •
Информатика
Двны два числа .найти наименьшее из них . lazarus
Ответ:
WWW2014
02.10.2020 03:26
Var
min,a,b:integer;
begin
min:=a;
if min>=b then min:=b;
write('min=',min);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Aemond
06.08.2020 03:23
16 цветов 1280×720 найти количество бит...
vladik2ppp
06.08.2020 03:23
От разведчика была получена следующая шифрованная радиограмма, переданная с использованием азбуки морзе: –•–•–•––••–••–•–•• при передаче радиограммы было потеряно...
facss
01.08.2022 15:17
Определите, что будет напечатано в результате работы следующей программы: var s, k: integer; begin s: =0; for k: =1 to 11 do s: =s+12; writeln(s); end....
kote03012
25.05.2021 15:42
Укажите методы идентификации физического лица ...
avorob
16.07.2021 00:44
ТЕКСТ ЗАДАНИЯ Как циркулирует информация от ВЗУ(внешнего запоминающего устройства) к процессору? укажите впорядке следования.Кэш-память, ОЗУ, Процессор, ВЗУВЗУ,...
VasyPupok228
29.03.2022 01:35
Жағдаят: сенің компьютеріңде ғаламтор жүйесі істемей қалды.кімге,қайда өтініш жазу керектігін анықтап біл....
jskzva1
06.08.2020 22:56
Какой из треугольников остроугольный a)8; 15; 17 b)15; 10; 10 c)7; 9; 11...
Seagate0012
30.12.2022 22:53
Найдите катеты прчмоугольного равнобедренного треугольника с гипотенузой 18 см...
raykyoko
04.07.2020 18:32
Выполните умножение (3а++1) решите подробно, просто я пропустила эту тему...
Машуля1790
04.07.2020 18:32
Унаташи в рюкзаке лежат 4 синие ручки, 1 чёрная, 2 красные и 3 зелёные. рассчитайте вероятность того, что наташа случайным образом достанет из рюкзака зелёную или...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
min,a,b:integer;
begin
min:=a;
if min>=b then min:=b;
write('min=',min);
end.