Информатика в Pascal вычислить: x-12, при xamp;gt;0S=5, при x=0

Программирование многие путают с кодированием, что абсолютно ошибочно. Программирование - это процесс написания программы, который начинается от постановки задачи, а кодирование - это запись уже сконструированного метода в виде программки на языке, понятном исполнителю этой программы.

Данный вопрос - хорошая иллюстрация к написанному выше. Метода нет, поскольку, что создатель вопроса не разумеет о чем идет речь, но зато он спрашивает, как выполнить кодирование на язык Паскаль. Полностью понятно, что создатель без помощи других этого сделать не может.

Вернемся к заданию. Как его можно попробовать осознать, речь идет о кусочной функции.


Кусочная функция содержит условия, определяющие её доли на разных промежутках. Поскольку в критериях есть операции сопоставленья, в Паскале пригодится условный оператор if - then - else, при этом не один.

// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var x:=ReadReal('x=');
  var s:real;
  if xlt;0 then s:=x*x else
    if x=0 then s:=5
    else s:=x-12;
  Writeln(s)
end.