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

Вычислить в языке программирования паскаль: y=x^2-|x|/(x+5)^2

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

Ответ:

andreisena4ev

03.10.2020 13:41

Var x : Real;
Begin
Readln(x);
Writeln('y = ',sqr(x)-abs(x)/sqr(x+5));
end.

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

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

Mako9375

27.04.2022 02:49

Вариант 8 1. Необходимокоридору шириной вначальногоПОпровестиРоботав одну клетку изположения (0) доконцаВыходыразмеромрасполагаютсякоридора, закрашивая при ЭТОМ всеклетки коридора,...

KarinochkaShiну

05.05.2021 00:14

Решите любые 10 задач(ВАЖНО! с расписыванием всех действий нужно закрыть долги по информатике...

arinasmail1

20.10.2022 19:55

Как вы думаете, в каком виде хранится в памяти информация о трехмерных объектах? 2. На каких этапах создания изображений в программах 3D-моделирования используется векторная и растровая...

аринка129

03.12.2021 19:40

В алфавитном языке племени тумба юмба четыре буквы: ы ш ч и о . Нужно вывести на экран все возможные слова, состоящие из К букв в которых есть по крайней мере две одинаковые буквы,...

shivaco

23.04.2023 16:58

Задание 2. Используя приложение Калькулятор узнаете, сколько времени между датами 17 марта 1974 года по сегодняшний день. Промежуток времени укажите в днях, неделях, месяцах и годах....

Ученик132312

09.05.2021 00:51

Составь алгоритм, по которому число 3 будет преобразовано в число 8...

Vikusyadubenko

04.10.2021 18:17

В данном фрагменте программыs:=0;for i:=1 to 10 dos:=s+2*i;вычисляется ...1)сумма первых десяти натуральных чётных чисел2)сумма целых чисел от 1 до 103)удвоенная сумма целых чисел...

soplador

03.06.2021 08:54

Приветствую, мне нужно сделать доклад по информатике какие используются компьютеры в сельском хозяйстве! ...

ilonabagdasarya1

01.09.2020 15:55

У исполнителя две команды,которым присвоены номера 1.умножитьна два.2.вычти пять.Первая команда удваивает число на экране,вторая уменьшает его на 5.Запиши порядок команд в алгоритме...

Snowghost

22.02.2022 14:42

Чему будет равна переменная х в результате выполнения программы:var x:integer;beginx:=1;while x 20 dox:=x+3;writeln(x);end....

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

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