Помогите сделать в полном и сокращённым паскале и программку

Помогите сделать в полном и сокращённым паскале и программку

Задать свой вопрос
Марина Волес
Я не собираюсь здесь посиживать и гадать, что значат эти школопедские словечки. Паскаль - это язык. Есть диалекты. Но "полный" и "сокращенный" он не посещает. Изъясняйтесь нормально, если желайте, чтоб Вас понимали.
Вероника Трушнина
Эникей, помоги с HTML
Никита Шелигов
или JAVASCRIPT
Толян
Эникей, вот мне задали писать программку If полное и If сокращённый. Вот так наверное понятно
Krantovskij Arsenij
Если речь об if - это не совершенно четкое заглавие, но полностью понятное и отражающее суть.
Ника
Так что поможете?
Люда Бутуровкина
Т.е. в Вашем случае либо будет один if - then - else, либо два if.
Дмитрий Скоп
Мне тоже
Nikita Kalishin
Для вас полная программа нужна либо только кусок кода?
Алена Хапунова
полная программка
1 ответ

PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018

Внимание! Если программка не работает, обновите версию!

begin

 var x := ReadReal('x =');

 var fx: real;

 // полный if

 if x lt; -1 then fx := 2 * x + 4

 else fx := x * x;

 // сокращенный if

 if x lt; -1 then fx := 2 * x + 4;

 if x gt;= -1 then fx := x * x;

 // совершенно краткий вариант

 fx := x lt; -1 ? 2 * x + 4 : x * x;

 // итог

 Writeln(fx)

end.

Ромка Бедоценов
Избираете только тот кусочек кода после комментария, который нужен
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт