Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kostya196
01.08.2021 03:12 •
Информатика
Составьте программу вычисления функции y=sinx2^n используйте подпрограмму,функцию для ее вычисления
Показать ответ
Ответ:
прждлшеджж
04.10.2020 19:14
Var x,y:real; n:integer;
function f(x:real;n:integer):real;
var i,st:integer;
begin
st:=1;
for i:=1 to n do st:=st*2;
f:=sin(x)*st;
end;
begin
writeln('x, n:');
readln(x,n);
y:=f(x,n);
writeln('x = ',x,' y = ',y);
end.
Пример:
x, n:
2 5
x = 2 y = 29.0975176584218
0,0
(0 оценок)
Ответ:
zhorik2006nice
04.10.2020 19:14
Program sinus;
var x,y:real;
begin
writeln('введите число');
readln(x);
y:=sin(x)*2*2;
writeln(y);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
olgapustovarova1
23.11.2020 09:13
Объясните, для чего необходимо выполнять развертки проектируемых объектов различного...
Masha1211111111
03.01.2022 03:47
З нижче наведеного вкажіть об єкти і події: а) сніжинка;б) розпочався дощ;в) парта;г) закінчився урок;д) учні розпочали роботу з комп ютером;е) користувач згорнув вікно...
mariaponomarev1
10.06.2022 22:47
На какой ленте находятся команды,необходимые для форматирования шрифта ?...
AnektodaNet
10.04.2021 11:48
Камень свободно падает в глубокое ущелье. Если не учитывать сопротивление воздуха, то через 3 секунды после начала падения он будет иметь скорость: 1) 10 м/с 2) 20 м/с 3)...
Даниил12345666
11.02.2023 07:49
Найди координату точки C(c) – середины отрезка AB, если a) A(–8) и B(4);ответ:.b) A(–10) и B(–6);ответ:.c) A(0,6) и B(–0,74);ответ:...
sudibor
11.02.2023 07:49
Вопрос 1 Укажи, где правда, а где ложь. Варианты ответов Глаголы с суффиксами -ся, -сь называются возвратными. Возвратные глаголы в неопределённой форме отвечают на вопросы...
nizametdinovaalina
08.10.2021 06:18
З пункту À одночасно у протилежних напрямах виїхали два потяги. Дослідіть, через який час відстань між ними стане більша ніж 400 км залежно від їх швидкостей. Створіть для...
swdw1
08.10.2021 06:18
Составьте предложения со словами Lamp, trip, friendly, look at ...
arina88561
30.05.2020 13:53
2. У теплоізольовану посудину налили 3 кг води за температури 25 0С, 1,5 кг води за температури 40 0С і 500 г води за температури 50 0С. Якою буде температура суміші після...
sashaboyko999p089tm
25.08.2020 17:18
Какие 3 расы составляют 88% ещё 6 задание полностью, а 7 по возмодности...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
function f(x:real;n:integer):real;
var i,st:integer;
begin
st:=1;
for i:=1 to n do st:=st*2;
f:=sin(x)*st;
end;
begin
writeln('x, n:');
readln(x,n);
y:=f(x,n);
writeln('x = ',x,' y = ',y);
end.
Пример:
x, n:
2 5
x = 2 y = 29.0975176584218
var x,y:real;
begin
writeln('введите число');
readln(x);
y:=sin(x)*2*2;
writeln(y);
end.