Программирование на языке паскаль вычислить значение - вопрос №3083717 от diiann 02.01.2023 23:20

Question

Информатика: Программирование на языке паскаль вычислить значение у для х заданному с клавиатуры по формуле y=1-x,если x 0 1+x,если x 10

diiann · Answer

Если для x из отрезка [0; 10] y не определено, то:
var x, y:integer;
begin
read(x);
if x > 10
then
y := x + 1;
if x < 0
then
y := 1 - x;
writeln(y);
end.

Программирование на языке паскаль вычислить значение у для х заданному с клавиатуры по формуле y=1-x,если x< 0 1+x,если x> 10