Добавил:
Источник:
Uman
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:01 семестр / Задачи на Paskal / Условные операторы. Циклы / 05
.txt Задача:
Требуется написать программу, вычисляющую значение какой-нибудь функции (у = 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. Так проще не запутаться.
Требуется написать программу, вычисляющую значение какой-нибудь функции (у = 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. Так проще не запутаться.