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

0 голосов
22 просмотров

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


image

Информатика (39 баллов) | 22 просмотров
0

Я не собираюсь тут сидеть и гадать, что означают эти школопедские словечки. Паскаль - это язык. Есть диалекты. Но "полный" и "сокращенный" он не бывает. Изъясняйтесь нормально, если хотите, чтобы Вас понимали.

0

Эникей, помоги с HTML

0

или JAVASCRIPT

0

Эникей, вот мне задали писать программу If полное и If сокращённый. Вот так наверно понятно

0

Если речь об if - это не совсем точное название, но вполне понятное и отражающее суть.

0

Так что поможете?

0

Т.е. в Вашем случае или будет один if - then - else, или два if.

0

Мне тоже

0

Вам полная программа нужна или только фрагмент кода?

0

полная программа

Дан 1 ответ
0 голосов
Правильный ответ

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

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

begin

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

 var fx: real;

 // полный if

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

 else fx := x * x;

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

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

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

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

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

 // результат

 Writeln(fx)

end.

(654k баллов)
0

Выбираете только тот кусок кода после комментария, который нужен