Это ! 35 б запиши программу на языке паскаль - вопрос №35100208751590 от apzjxmskaposjxhdh 05.08.2022 12:01

Question

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

apzjxmskaposjxhdh · 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.