X,y,min: Integer; BEGIN Write( Vvedite X i Y: - вопрос №14675971 от sofialipezina23 20.04.2022 19:23

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. в чом ошибка

sofialipezina23 · 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. в чом ошибка