Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
ddurua
01.01.2020 21:58 •
Информатика
4.1. даны два действительных числа x, y. найти min от x+y и x-y
Ответ:
Denchik01TURBO
21.09.2020 23:32
Var x,y : Real;
Function Min(a,b : Real) : Real;
Begin
If a<=b then Min:=a else Min:=b;
end;
Begin
Readln(x,y);
Writeln(Min(x+y,x-y));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vanuytoa
20.10.2020 08:36
У тебя есть флешка объемом 2Гб. поместятся ли на неё 3 файла размером 1535Мб?...
alinaozhiganova
14.01.2021 04:59
Подскажите, что нужно добавить в программу, чтобы сделать 1 заголовок (h1) другим цветом? (например, цвет olive )...
IhaveAbrains
28.10.2020 04:12
Перевести из одной системы исчисления в другую. подробно, без калькулятора в скобках указана система f41(16)=? (10) 5d(15)=? (8) 125(7)= ? (2) 273(8)=? (16)...
Anton2657
03.02.2022 06:33
1) Попробуйте ещё упростить полученное условие. (х2 + у2 ≤ 1) и ((х ≤ 0) или (х ≥ 0) и (у ≤ -х)).2) Запишите условие, которое определяет области на рисунках (рис. 2.28)....
Лида1113внк
27.03.2020 19:37
д) Выбирай направление на каждом шаге и прокопай тоннель так, чтобы собрать как можно больше кристаллов....
M89226691130
08.07.2020 09:57
Тести до поеми Т. Г. Шевченка Катерина Чому батьки виганяють єдину доньку? а) вони не зможуть прогодувати її дитину.б) так наказав пан-кріпосник в) знають, що в Московщині...
Temosha101010
28.11.2022 08:12
Структурна формула целюлози...
manazoid
19.01.2022 16:56
До іть знайти точки екстремуму....
sofia2204
22.01.2022 14:07
Статистические данные и их характеристики: среднее арифметическое, мода, медиана, размах. Урок 2Самат за последние 7 суммативных оцениваний за раздел получил следующие...
Незнайка1652
22.01.2022 14:07
Тест Казахский язык 1.Қазақ тіліне тән дыбыстары бар сөздер.а) жем,су,малшыв) жауап,таза,барадыс )ет, адам,малд) жұмыртқа, ұя,жағдай2. Синонимдерді табыңыза) бөлме,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Function Min(a,b : Real) : Real;
Begin
If a<=b then Min:=a else Min:=b;
end;
Begin
Readln(x,y);
Writeln(Min(x+y,x-y));
end.