Вводится с клавиатуры число х. если х< 0, то y=4, если х=0 то y=2, а если х< 0, то y=х если можно то сразу с дано , контрольным примером, блок схема и метод решения

program vndj;

uses crt;

var x,y:integer;

begin

clrscr;

readln(x);

if x<0 then y:=4;

if x=0 then y:=2;

if x>0 then y:=x;

writeln(y);

readln;

end.

Последние условие скорее всего "x>0", ибо ерунда получается

Блок-схему сам рисуй