Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
хорошист546
04.03.2023 19:08 •
Информатика
Вычислить на языке паскаля f(x)= sin(x), если x> 0; cos(x), в остальных случаях
Ответ:
мансур45
03.10.2020 23:48
Внимание, на вход данной программы принимаются радианы, а не градусы.
var x:real;
begin
readln(x);
if(x>0) then writeln(sin(x))
else writeln(cos(x));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Привет14963
24.08.2021 03:06
Хочу попросить решения с программирования.вот сама . сложите программу которая будет вычислять сумму двух чисел а и b....
SpOoN777
22.05.2021 12:53
Составить алгоритм. по рассказу : винни пух решил устроить праздник. купил своим друзьям подарки: конфеты, мороженое, пироженое, морковь, капусту, книги и очки....
domaris246
25.10.2020 10:25
Автомат получает на вход пятизначное десятичное число. по полученному числу строится новое десятичное число по следующим правилам. 1. вычисляются два числа – сумма...
MmVl
05.03.2023 22:50
Дана строка: Дуракам закон не писан, если писан, то не читан, если читан, то непонят, если понят, то не так. 1 Подсчитать сколько в этом предложении слов и вывести...
Syrkova1
08.03.2020 07:41
Сколько секунд потребуется модему, передающему сообщения со скоростью 128000 бит/с, чтобы передать сообщение объёмом 247 Кбайт?...
Wolfie2006
17.11.2021 05:01
Что из перечисленного относится к сервисным программам? Аппаратный интерфейс Операционная система Антивирус Касперского Загрузка компьютера...
froze1997
16.07.2020 08:14
Разберите слова по составу ққ, ырғып, асқар, таймаған, жүрек, енді, алдай....
elinashovhalova
16.07.2020 08:14
Ступени развития общества(типы обществ) их три...
nikita8989
16.07.2020 08:14
Текст песни чемпионы нашего двора...
stepdol
16.07.2020 08:14
Зачем грибам яд, от чего они защищаются?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var x:real;
begin
readln(x);
if(x>0) then writeln(sin(x))
else writeln(cos(x));
end.