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

Напишите в turbo pascal: b+√(b^2+4ac)/2a - a^3c+b^-2

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

↓

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

killskorpion19

11.02.2023 05:07

Суретти ондеу такырыбына ереже ...

Otlichnica999

13.04.2021 06:59

3. Вычисли: (1 & 0) v1) & (1 V А). A...

f0kYsss

27.05.2020 11:51

Сколько единиц в двоичной записи числа 65...

nikakrasovska

22.02.2020 10:12

Программа в pascal abc. а) треугольник с вершинами (100. 100), (150. 100). (30,170); б) прямоугольник с вершинами (80. 30). (170. 30). (170.150). (80.150): в) пятиугольник с вершинами...

Kaffidr0y

11.11.2020 19:21

Создать массив, каждый элемент которого рассчитывается по формуле: i^2-1, где i – индекс элемента массива. вывести полученный массив на экран, расположив каждый элемент в отдельной...

1234567891011121314з

26.07.2021 06:31

Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона. вывести созданный массив на экран, расположив элементы в одну строку через пробелы....

Masha7698755g

26.07.2021 06:31

Одномерные массивы паскаль заменить все элементы массива, большие второго и меньшие пятого, на сумму второго и пятого....

UbisCraft

01.01.2020 19:52

Потрібно закінчити програму і визначити функцію , щоб знайти середнє значення трьох чисел ,які ми вводимо(Нужно закончить программу и определить фунуцию ,чтобы найти среднее значение...

ната555555

07.04.2020 13:32

3. Поколения эв. 2 Заполните таблицу. (Работать с таблицей рекомендуется, используя облачные технологии.) Школьный компьютер: Процессор Частота процессора Объем оперативной памяти...

nyanchann

29.05.2023 13:03

даже если бы мини и базовые блоки были недорогими, почему маловероятно, что вы купили бы их для своего дома? even if minis and mainframes were inexpensive, why is it unlikely that...

Ответ:

xmistick

13.06.2020 19:11

Program Pr1; Uses Crt;

var a,b,c: integer; y: real;

begin clrscr;

Writeln('введите a,b,c');

Readln(a,b,c);

y=b+sqrt(b*b+4*a*c)/(2*a)-a*a*a*c+b*b-2;

Writeln('Y=', y:5:2);

Readln;

End.

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

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

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