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

Решить в паскале z=(min(x,y)+0,5)/(1+max*max(x,y))

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

Marinakaleda

12.02.2021 01:00

Как сделать игрового бота кликер в ВК на питоне (Можно код...

Лейла1986

12.02.2021 01:00

Задайте массив из 10 элементов с датчика случайных двухзначных положительных чисел. Найдите разность наибольшего и наименьшего элементов. Выведите на экран полученный...

anatoliy92itf

22.09.2020 02:55

Перевод азбуки морзе информатика -----.-.-...

Bollsav

01.05.2021 23:18

Установите соответствие между математическими выражениями и записями на языке программирования Python Математическая записьЯзык программирования С++5х+3x/(y+3)a*b*c/4*Rх5...

эля0521

09.07.2022 19:55

Напишите программу, которая вводит трёхзначное число и разбивает его на цифры. например, при вводе числа 123 программа должна вывести «1 2 3». входные данные входная...

vecronika54

20.05.2023 23:39

Надо написать две программы на языке паскаль. одну с циклом while, а вторую с циклом for. k=a^n (a в степени n). для программы цилка for нарисовать блок-схему. дано:...

sasunaklukina

04.09.2022 20:59

Дан одномерный массив a(2n).сформировать двумерный массив...

миёк2

13.03.2022 15:07

Ограничение времени 1 секунда ограничение памяти 64mb ввод стандартный ввод или input.txt вывод стандартный вывод или output.txt в самом начале своего пребывания...

DariaTheBest5

02.03.2020 23:42

Выясни, что за шифр (штакетник или парная перестановка букв) и дешифруйте текст: !т...

kristina1861

18.11.2021 10:06

Если через 6 лет сумма возраста 5-и моих друзей будет равно 117,то чему будет равна сумма через 18 лет...

Ответ:

cirnololi

29.07.2020 16:28

Var
X,Y,M:real;
Begin
Write('X = ');ReadLn(X);
Write('Y = ');ReadLn(Y);
if X>Y then
Begin
M:=X;
X:=Y
End
else M:=Y;
Write('z = ',(X+0.5)/(1+M*M))
End.

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

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

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