Запиши программу на языке Паскаль для:
y=0,еслиx≤0
x,если01.
(y:3:0)- хз для чего это
Запусти программу и введи значение x=−4.

Var
    x, y: real;

begin
    readln(x);
    if x <= 0 then y := 0
    else y := x;
    writeln(y:3:0);
end.

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!