Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
serdykivka
27.06.2020 01:15 •
Информатика
Решить в паскале z=(min(x,y)+0,5)/(1+max*max(x,y))
Показать ответ
Ответ:
gerczunt
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 оценок)
Популярные вопросы: Информатика
Знания
13.04.2022 17:36
Дана последовательность чисел длиной N(2≤N≤999). В этой последовательности члены, больше M, замените числом P. Выведите на экран результат замены и количество замен. В данном...
eroly12ramblerr2
19.04.2022 01:48
А) составить программу на паскале, в которой вычисляется выражение 3*7 div 2 mod 7/3 - trunc (sin(1))б) составить программу на паскале для (фото прикрепила)...
svetlanaastahov
11.01.2020 19:47
Автоматическое устройство осуществило перекодировку информационного сообщения на русском языке, первоначально записанного в 16-битном коде Unicode, в 8-битную кодировку КОИ-8....
АААННЯЯЯ111
21.09.2022 15:19
А Java и JavaScript это отдельные языки программирования? Или Java это инициал для JavaScript?...
Kakation
14.01.2022 16:28
Кохану, талдау және жинақтау деңгейі . Тек қана Паскальдің алгоритмдік тілі – төменгі деңгейдегіПікірді түзетіңдер:тіл болып .- жоғарғы деңгейдегі программалау тілі алфавит...
Emlrd
23.02.2021 11:40
ИНФОРМАТИКА. ПАСКАЛЬ(ЯЗЫК ПРОГРАММИРОВАНИЯ) Задача 1. Создайте программу, определяющую, какой сейчас сезон по введённой температуре воздуха:от 0 до -30 0С – зима; от +20 до...
j5022778
14.02.2020 08:29
. Даны строки а, b и c, состоящие только из цифр. 1. Выведи эти строки слитно на экран. 2. Преобразуй эти строки в целые числа и найди их сумму бол ше нету надо...
лика20042
21.10.2022 22:33
СОЗДАЙТЕ ПРОЦЕДУРУ, ПЕЧАТАЮЩУЮ НА ЭКРАНЕ СЛОВО HELLO И ПРОГРАММУ, КОТОРАЯ С ЕЕ НАПЕЧАТАЕТ СЛОВО HELLO 10 РАЗ.\ Delphi...
averdarya
19.06.2021 17:40
Задание 2 Найдите периметр и площадь кабинетаинформатики. Пусть ширина кабинета бу-дет а метров, а длина 6 метров.b метра метр...
Anuliks
11.03.2020 04:16
в. Дайте будь ласка повне рішенння. Автомобіль масою 9 т рухається з постійною швидкістю 72 км/год . З якою силою тисне автомобіль на середину: a) горизонтального містка b)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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.