1. Информатика
  2. Решить в паскале z=(min(x,y)+0,5)/(1+max*max(x,y))

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

VenyaMenya VenyaMenya    2   06.07.2019 09:00    3

Ответы
Vrronika778 Vrronika778  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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
belovavaleriya belovavaleriya  03.06.2019 20:50
На смекалку. четыре пассажира ждали поезд 2 часа. сколько времени ждал поезд каждый пассажир?...
sofialipezina23 sofialipezina23  03.06.2019 20:50
Какое место на диске займет текст из 7000 символов написанный на языке с алфавитом 256 символов...
murzyatyan murzyatyan  20.05.2019 16:53
40 вычислить и вывести все значения y по формуле y=4-x для всех целых значений x от 1 до n.! причина...
Максим111136322 Максим111136322  20.05.2019 18:10
Принципиальная схема эвм и пэвм .их отличия и сходства. !...
karolina85 karolina85  20.05.2019 18:10
Дан целочисленный массив из 30 элементов. элементы массива могут принимать произвольные целые значения. составьте программу, которая находит и выводит номер третьего }...
nactya201613 nactya201613  09.08.2019 10:10
Счем едят данное условие у = е в степени 0.5x/(дробь) cos (2x) - 5...
kwjeps kwjeps  09.08.2019 10:10
Определите информационный объем изображения с глубиной цвета 32 и размером на 600 на 900(полное решение)...
мaкs2005 мaкs2005  26.04.2022 18:52
Задача по Ассемблеру: дан массив из 10 байт. Посчитать количество байт с числом единиц в байте равным трем Мой код:Mov Cx, 10Xor BL, BLGet: Shl Al, 1Jnc NoInc BlCmp Bl, 3Inc...
Skeletron129 Skeletron129  26.04.2022 18:44
Знайти периметр і площу квадрата, якщо відома довжина його сторони а....
vikaapostol28 vikaapostol28  26.04.2022 18:17
Задача №11 Робот в правой верхней клетке прямоугольника 2×15. Там могут быть только вертикальные стенки длиной в 1 клетку, примыкающие к верхней стороне прямоугольника. Их...

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