01 семестр / Задачи на Paskal / Условные операторы. Циклы / 05

Задача:
Требуется написать программу, вычисляющую значение какой-нибудь функции (у = f(x)). Допустим, такой:

у = x – 2, если x > 0,
y = 0, если x = 0,
y = |x|, если x < 0.

Алгоритм решения задачи:
Задача решается очень просто.

Программа на языке Паскаль:
var
x, y: integer;

begin
write ('x = ');
readln (x);

if x > 0 then
y := x - 2
else
if x = 0 then
y := 0
else
y := abs (x);

writeln ('y = ', y);

readln
end.
Примечания:
В языке программирования Паскаль желательно вложенные конструкции if-else помещать в ветку else, а не if. Так проще не запутаться.