Помогите пожалуйста, очень прошу
написать это на языке паскаль
cos^2 x^2

Program sqrcos;
var x:real;
begin;
read(x);
write(sqr(cos(sqr(x))));
end.

Оцени ответ

Не нашёл ответ?

Если тебя не устраивает ответ или его нет, то попробуй воспользоваться поиском на сайте и найти похожие ответы по предмету Информатика.

Найти другие ответы

Самые свежие вопросы

Первая
«
1
2
3
4
5
»
Последняя

Информатика, опубликовано 11.11.2018

Напишите программу, пожалуйста.

Даны два числа, не равные друг другу. Замените большее из них молулем суммы, а меньшее-разностью квадратов этих чисел.

Информатика, опубликовано 11.11.2018

Чему равна информационная ёмкость сообщения, уменьшающего неопределённость в 5 раз: 1 бит, 2 бита, 3 бита, 4 бита?

Информатика, опубликовано 11.11.2018

Информатика раскрась рисунки на которых число насекомых больше числа птиц.Обведи рисунки,на которых число насекомых не больше числа птиц.Отметь рисунки на которых зверей не меньше чем птиц.

Информатика, опубликовано 11.11.2018

Перед вами гипотетический процессор с 32 разрядной адресацией. При каждой операции вводятся или извлекаются 32 бита данных. Ответьте на нижеследующие вопросы. Ответ дать в десятичной системе.
a. Каков максимальный размер адресного пространства? (число адресуемых ячеек памяти к которым процессор имеет непосредственный доступ)
b. Каков максимальный объём памяти доступной данному процессору?
c. Каков адрес последней ячейки памяти к которой процессор может обратиться?

Информатика, опубликовано 11.11.2018

Здравствуйте,помогите решить