Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.02.2023, 22:24   #11
Alex314
Пользователь
 
Регистрация: 14.04.2014
Сообщений: 10
По умолчанию

Собственно, вот и все. Четыре строчки.

Код:
## // PascalABC.NET 3.8.3
var x := ReadReal;
var f := x < -2 ? -2 : x < 4 ? x : 4;
Print(f)
Alex314 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Дано действительное число x. Вычислить f(x) danil031997 Паскаль, Turbo Pascal, PascalABC.NET 2 14.11.2016 23:13
Дано действительное число x, вычислить значение у Stixon Общие вопросы C/C++ 0 04.10.2016 20:55
Дано действительное число а. Вычислить f(a) для функции f(x) Artem1987 Помощь студентам 11 11.11.2010 09:51
Дано действительное число x. Вычислить hewlett Помощь студентам 2 26.06.2010 08:30
Дано действительное число х. Вычислить Incognitoal Помощь студентам 7 09.03.2009 12:27