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

Написать программу на языке pascal. 1: 2:

Ответ:

ЮлияК111111

19.08.2020 07:21

1.var a,x,y:real;
begin;
readln(a);
readln(x);
y:=((sqr(x)-5)+a)/(3*a*sqr(sqr(x)));
writeln(y);
end.
2.var x,y:real;
begin;
readln(x);
y:=sqr(x-1)/(2*sqr(x)-1);
writeln(y);
end.

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

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

Golpio

09.04.2021 05:01

Для кодирования букв а, в, с, d используются трехразрядные последовательные двоичные числа, начинающиеся с 1 (от 100 до 111 соответственно). если таким закодировать последовательность...

diant020502

24.06.2022 13:51

Найдите площадь прямоугольного параллелепипеда, если длинны его рёбер a, b, c вводятся с клавиатуры. s=2*c*(a+b)...

азаззазазаазз

24.03.2022 01:48

Paint графикалық редакторын калай іске косамыз...

Розетта99

17.02.2023 23:04

Между населёнными пунктами A,B,C,D,E,F построены дороги , протяжённость которых ( в километрах) приведена в таблице Определите длину кратчайшего пути между пунктами A...

Полина9111111

26.01.2021 00:45

Какое значение будет иметь переменная Х после выполнения команд присваивания X:=5 S:=2 Y:=X+2*S X:=X+Y*2...

vikaisaenko1511

14.06.2022 21:57

Между населёнными пунктами A,B,C,D,E,F построены дороги , протяжённость которых ( в километрах) приведена в таблице Определите длину кратчайшего пути между пунктами A...

dianacat1017

09.05.2020 14:44

Каков результат работы программы: Var k, m: integer; Dat: array[1..15] of integer; Begin Dat[1] := 12; Dat[2] := 15; Dat[3] := 17; Dat[4] := 15; Dat[5] := 14; Dat[6] :=...

Незнайка2333

27.08.2020 19:02

Укажите , где оператор присваивания или имя переменной написаны неверно? А:=5+5; С=28; 1game:=30; a=c+5...

timirshan

21.01.2023 11:12

Один рабочий может выполнить производственное за 5 часов, а другой за 15 часов. какую часть они выпалнят , если будут работать вместе 1 1/4 часа? успеют ли они , работая...

MashaFox25

21.01.2023 11:12

Свои карабли викинги поэтично называли кони моря. какой смысл они вкладывали в эти...

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

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