tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Втурбо паскале..вычислить следующее
Втурбо паскале..вычислить следующее выражение при x = 10, y = 3: z = (sin37+cos73+tg23)/(x^2-2xy^2+y^4) ^ -возведение в степень.
hromgugd
1 01.07.2019 09:30
1
Ответы
Котейко444
02.10.2020 17:19
Uses
Crt;
const
Pi=3.14159265;
var
x,y,z:real;
begin
ClrScr;
x:=10; y:=3;
z:=sin(37*Pi/180)+cos(73*Pi/180)+sin(23*Pi/180)/cos(23*Pi/180);
z:=z/(sqr(x)-2*x*sqr(y)+sqr(sqr(y)));
Writeln(z);
ReadKey
end.
Результат выполнения программы
1.3186615443E+00
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Reiny
14.05.2020 11:16
Для чего используется плоттер? •Для ввода информации •Для вывода информации •Для запоминания информации •Для уничтожения информации...
az12345687
14.05.2020 11:15
Текст, подготовленный на компьютере, содержит 1024 символа. Информационный вес каждого символа – 32 бит. Запишите информационный объём этого текста в килобайтах. В...
nastyaiermakova12
14.05.2020 11:15
1. Межде моделью и объектом, интересующим исследователя, должно существовать подоби1.2.3....
Kakan123455
14.05.2020 11:15
Перо Чертёжника находится в точке (x,y). Сместиться на вектор (a,b), если a=8,b=8. После выполнения команды, координаты новой точки: (x+ , + )....
JAHGH
14.05.2020 11:05
Переведи Ip-адрес из двоичной системы в десятичную 1) 11000000 10101000 11010010 0011001 2)10000000 000000 000000 0000001 3) 11100100 1000000 10011001 1111010...
NastyaCat21
14.05.2020 11:05
Информатика.. Определите, что будет напечатано в результате работы следующей программы. var y, i: integer; begin y := 5; for i := 1 to 3 do y := y + 5 * i; writeln(y);...
Psix007
14.05.2020 11:05
Перечислите модели взаимодействия открытых систем...
apetrochenkov
14.05.2020 11:15
Напишите программу, которая определяет произведение ряда n!=1•2•3•…•n, где n – натуральное число. В программе используйте цикл с параметром....
irinasid
14.05.2020 11:15
Запитання 4Наказ виконавцеві виконати певні дії - цеваріанти відповідей1. Команда2. Прохання3. Вказівка4. Звертання ть ...
karinka20001202
14.05.2020 11:01
помагите это СОР по информатике. Даю 4 задание: заполните ячейки транссировочной таблицы используя данные из проекта...
Популярные вопросы
уявіть,що хтось із ваших знайомих чи рідних вирішив подарувати...
2
Посмотри диаграмму ,Какие причины можно объединить? 1конкуренция...
2
26А, Спишите текст, вставляя пропущенные буквы, расставляя недостаю-...
3
Тәуекел түбі жел қайық мәтін...
3
с цепочкой: алкен-алкилгалогенид - спирт- альдегид...
3
Семейные ценности и традиции Прочитай текст.ответь, верны или неверны...
2
1.числовая последователность (xn) выражена так:a) xn=3,4 -1,6nb)x1=1,...
1
Напишите образование ионов алюминия,фосфора,серы,калия,магния...
3
Решите, завтра сдавать за лето отупел...
3
За змістом топографічні карти належать до...
1
Crt;
const
Pi=3.14159265;
var
x,y,z:real;
begin
ClrScr;
x:=10; y:=3;
z:=sin(37*Pi/180)+cos(73*Pi/180)+sin(23*Pi/180)/cos(23*Pi/180);
z:=z/(sqr(x)-2*x*sqr(y)+sqr(sqr(y)));
Writeln(z);
ReadKey
end.
Результат выполнения программы
1.3186615443E+00