Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
hehsggsvsg
21.08.2021 09:13 •
Информатика
Выполните вычисление по формуле |x|-|y|/1+|xy|. из паскаля
Ответ:
Enjoy167
03.10.2020 07:11
Var
x, y, s: real;
begin
readln(x);
readln(y);
s := abs(x) - abs(y) / 1 + abs (x*y);
writeln(s);
end.
0,0
(0 оценок)
Ответ:
uefip
03.10.2020 07:11
//Pascal ABC.NET v3.0 сборка 111
Var
x,y:real;
begin
read(x,y);
write(abs(x)-abs(y)/1+abs(x*y));
end.
Пример ввода:
1
2
Пример вывода:
1
0,0
(0 оценок)
Популярные вопросы: Информатика
Bigrash
19.02.2022 23:27
1. Что такое таблица? 2. Таблица состоит из чего? 3. Что такое электронная таблица Excel?...
Shmops1063
05.01.2021 02:34
Впаскале. отсортировать исходный одномерный массив по возрастанию методом поиска максимума и обмена...
самая29
05.01.2021 02:34
Массив а(n,m).в каждом столбце найти среднее арифметическое нечетных элементов.из полученных значений сформировать одномерный массив....
begem0tcs
28.02.2021 11:15
Напишите программу в турбо 3 целых числа a, b и c, представляющие собой длины сторон треугольника. вывести сообщение о том, является ли треугольник прямоугольным....
саша4275
28.02.2021 11:15
Может кто рассказать как сложить эти два числа: 17(8) и 17(16)?...
kotikmotik55
12.11.2022 08:08
1) які типи алгоритмів використовуються в програмуванні ? а) розмірений б) прямий в) циклічний г) з розгалудженням д) лінійний 2) вкажіть об єкти, які можуть бути запаковані...
ElizavetaMusic
12.11.2022 08:08
Найти суммарную площадь n колец, внутренние радиусы которых одинаковы, а значение внешних радиусов образуют последовательность: 5, 10, ). нужно написать решение в турбо...
diasashat11
21.07.2020 12:16
В-2 1) опишите последовательность 30 действительных чисел с массива. 2) дан фрагмент программы: for i: =1 to 10 do a[i]: =20-i*(i-1); определите элемент массива. 3) дан...
raysat2
18.05.2021 17:01
Дана переменная i=1 и цикл while i 5: print( Hello World ). Укажи количество итераций (проходов) цикла Дана переменная i=1 и цикл while i =9: i=i+2. Укажи количество итераций...
krut2202
01.02.2022 01:37
Даны 2 диагонали ромба, вычислить площадь ромба. Питон...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
x, y, s: real;
begin
readln(x);
readln(y);
s := abs(x) - abs(y) / 1 + abs (x*y);
writeln(s);
end.
Var
x,y:real;
begin
read(x,y);
write(abs(x)-abs(y)/1+abs(x*y));
end.
Пример ввода:
1
2
Пример вывода:
1