Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Krosarik
30.11.2020 05:33 •
Информатика
Дано число x, составьте программу которая выводит в порядке возрастания числа: x+5 sin(x) x^2 паскаль
Показать ответ
Ответ:
Joker128223
16.08.2020 11:14
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadReal('x=');
Seq(x+5,Sin(x),x*x).OrderBy(x->x).Println
end.
Примеры
x= 0.7
0.49 0.644217687237691 5.7
x= -1.4
-0.98544972998846 1.96 3.6
0,0
(0 оценок)
Популярные вопросы: Информатика
artik5990765
03.09.2022 13:22
Какой из адресов e-mail корректен? 1.глеб@mur.ru; [email protected]; [email protected]; [email protected]; [email protected]; 6....
Arse20
03.09.2022 13:22
Обнулить все отрицательные элементы массива и посчитать количество остальных....
patoga79p00pc3
03.09.2022 13:22
Какие из представленных выражений не имеют смысла, если с1–числовая, с2–булева, с3–текстовая переменные? a. (c1+2/3) или c2 b. с2 и не(с1 2) c. (c3 текст ) и (с1=0)...
VladBugorkov
16.09.2021 05:32
1. суреттен жаңа сөздерді тап.үлгі: сахна, үстел, ...
SALATIN11
29.10.2021 10:00
Ккакому выводу приходит герой рассказа крыжовник ?...
вжух8
02.03.2021 06:26
60 какова основная проблема произведения в.токаревой „рождественский рассказ”...
AnektodaNet
08.04.2022 04:35
Запиши трехзначное и двухзначное числа, разность которых равна 55...
supermosyagina
12.04.2022 09:12
Сделать к сегодняшнему днюпрямо сейчас умоляю вас ...
Наркодилер
31.03.2021 12:47
Анализ политического строя (саков, усунов, гуннов)1.становление2.политический строй3.источники о государственности племенных союзов4.вывод...
AlikhanKazbekov
20.01.2023 07:42
Кестені тиісті сөздермен толықтыр...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var x:=ReadReal('x=');
Seq(x+5,Sin(x),x*x).OrderBy(x->x).Println
end.
Примеры
x= 0.7
0.49 0.644217687237691 5.7
x= -1.4
-0.98544972998846 1.96 3.6