Запиши программку на языке Паскаль для: y=0,еслиx0x,если

Запиши программку на языке Паскаль для: y=0,еслиx0
x,если 0lt;x1
x(квадрат),если xgt;1
Запусти программку и введи значение x=-17.
(y:3:0)
Число выведенное на экран:

Задать свой вопрос
1 ответ

begin //PascalABC.NET

 var x, y: real;

 Read(x);

 if x lt;= 0 then Print(0)

 else Print(x gt; 1 ? x * x : x)

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт