Найдите ошибки в операторах на языке Pascal.При записи условий на первом месте записывайте переменную.
Program vetv2;
Var x,y:real;
Begin
Writeln('Значение выражения');
Write('Введите x,y');
Readln(x,y);
if 1then x:=x+1; y:=0;
Else x:=0; y:=y+1;
Writeln(x);
Writeln (y);
End.
if 1then x:=x+1; y:=0;
Else x:=0; y:=y+1;
// 1. не задано условие между if-then, должно быть: «if (условие) then»
// 2. перед else не должно быть знака «;» Можно написать так: «begin x:=x+1; y:=0; end else»