Войти Регистрация Спроси ai-bota

Найти и напечатать u = min{x+y, xy}

Показать ответ

Ответ:

pakskina77p0byhm

03.10.2020 02:02

Var x,y,u:real;
function min(a,b:real):real;
begin
if a>b then min:=b else min:=a;
end;
begin
write('x=');read(x);
write('y=');read(y);
u:=min(x+y,x*y);
writeln(u);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Котик132457

07.12.2020 02:39

(30 )) на паскаль : дано целое число n ( 0). последовательность действительны х чисел ак определяется следующим образом : ао = 2, ак = 2 + 1 / а к -1 , к = 1,2,...

Panda2368

18.09.2021 15:57

Вчем состоит основная заслуга г. холлерита? а) создал счетно-перфорационную машину б)создал первую эвм на вакуумных лампах в) создал первую микро-эвм г)создал первую...

daanya666

31.12.2020 02:35

Чему будет равен объем информации при равномерном кодировании 2-ичным кодом минимальной разрядности сообщения из 5-ти символов 15-ти буквенного алфавита?...

katy0987

30.05.2021 17:52

Маршруттық парақшада берілген суретке қарап,құрал сайман атауларын тұсына жазып шық...

anisimanis

03.10.2020 02:23

Программе на вход даются целые числа n и k, найдите длину записи числа n в системе исчисления с основанием k...

karachevamaria4

08.04.2020 17:04

Подчеркнуть ошибки в следующих фрагментах программ:...

nastya2631

28.04.2023 18:35

Заполните таблицу ссылки: группа элементов назначение...

daravill1

06.07.2022 20:25

Код на с++ написать код на с++,который определяет среднее значение 3х цифр(с использованием функции) я написала такой,но он слишком легкий и сюда не хватает функции:...

Marina4578

01.03.2023 10:05

щорічно в світі добувають 3,2*10^9 м^3 нафти причому 8%від цієї кількості потрапляє в море. яку площу моря покриє ця нафта якщо 1м^3 покриває 12 км^2 води...

RainbowRashers

29.12.2022 16:50

Знайдіть значення виразу 5⁰-2-⁴...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку