Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
nusaba55
30.05.2023 01:29 •
Информатика
Найти max{min(a,b), min(c,d)} написать на паскале.оператор if без всяких function
Показать ответ
Ответ:
vikagalimzhano
03.10.2020 11:32
Var a,b,c,d,min1,min2,max:integer;
begin
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
write('d = '); readln(d);
if a<b then min1:=a else min1:=b;
if c<d then min2:=c else min2:=d;
if min1>min2 then max:=min1 else max:=min2;
writeln('max = ',max);
end.
Пример:
a = 5
b = 2
c = 1
d = 4
max = 2
0,0
(0 оценок)
Популярные вопросы: Информатика
zyxra4
05.06.2020 07:40
Ваш менший брат, учень п’ятого класу, отримав домашнє завдання підготувати картку порівняння казки «Ріпка» в українській та російській інтерпретації. Оскільки вашому братові...
берсик7
13.02.2021 02:42
Сформируйте массив, содержащий 15 элементов, с датчика случайных чисел. получите новый массив, каждый элемент которого равен среднему арифметическому соответствующего элемента...
пажалуйста4
17.07.2020 01:53
Для хранения растрового изображения размером 128х128 пикселей отвели 4 кбайт памяти. каково максимально возможное число цветов в палитре изображения?...
ririf
17.07.2020 01:53
Запишите внутреннее представление десятичных чисел,используя 8-разрядную ячейку: а)32 б)-32 в)102 г)-102 д)126 е)-126...
PolinaDudnik
18.03.2022 01:06
Небольшое сообщение на тему: на чём и чего люди записывали информацию в былые времена?...
HiКАK
30.09.2020 00:15
1) правильно ли определён тип величины? a. количество тетрадей - вещественный тип b. кличка собаки - символьный тип с. вес контейнера - целый тип 2) укажите тип величины, если...
mtrololo09
14.06.2022 11:29
Вpascal abc необходимо: 1. вывести на экран все двузначные числа, которые нацело делятся на число, введённое пользователем. 2. даны трёхзначные натуральные числа n и k (n k)....
alena0707listru
14.06.2022 11:29
Проходим сейчас шифры цезаря и виженера. не могу решить это ( -кодирование осуществляется перестановкой букв в слове по одному и тому же правилу. восстановить слова и описать...
epicrare15
25.11.2021 17:41
Дано число а и натуральное число n . напечатать на экране а в степени n ( паскаль цикл с предусловием)...
mashapa2001
11.05.2023 16:55
Кто разбирает в powerpoint ? есть небольшая проблема. сделал презентацию, к ней огромное количество других, связанных между с собой. все прекрасно работает на копме, только...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
write('d = '); readln(d);
if a<b then min1:=a else min1:=b;
if c<d then min2:=c else min2:=d;
if min1>min2 then max:=min1 else max:=min2;
writeln('max = ',max);
end.
Пример:
a = 5
b = 2
c = 1
d = 4
max = 2