X,y,min: Integer; BEGIN Write( Vvedite X i Y: ); Readln(x,y); If xElse min:=y; If x-yWriteln( MIN= ,min); Readln END. в чом ошибка

Question

Математика: X,y,min: Integer; BEGIN Write( Vvedite X i Y: ); Readln(x,y); If xElse min:=y; If x-yWriteln( MIN= ,min); Readln END. в чом ошибка

rizvanovagyla3 · Answer

var x,y,z,min,a,b:integer;Begin read(x,y,z);a=sqr(x)+sqr(y)-4;b:=sqr(y)*sqr(x)-4;if  a b then min:=a else min:=b;writeln(min);End....

X,y,min: Integer; BEGIN
Write('Vvedite X i Y: '); Readln(x,y);
If xElse
min:=y;
If x-yWriteln('MIN= ',min);
Readln
END.
в чом ошибка