Это ! 35 б запиши программу на языке паскаль для: - вопрос №8752267351002 от Бегимотик002 17.02.2023 09:44

Question

Информатика: Это ! 35 б запиши программу на языке паскаль для: y= 1)0,если x ≤ 0 ; 2)x,если если 0 x ≤ 1 ; 3) x 2(икс квадрат),если x 1. (y: 3: 0) запусти программу и введи значение x=4. число выведенное на экран

Бегимотик002 · Answer

program HelloWorld;

var x,y: integer;

begin

x:=4;

if (x<=0) then

y:=0;

if (x>=0) and (x<=1) then

y:=x;

if (x>1) then

y:=sqr(x);

write(y);

end.