Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Program vika;
var x, y : integer;
begin
writeln (Ведите x);
readln (X);
writeln (Ведите y);
readln (y);
if
(x>0) and (y>0) then writeln ( В 1)
else
(x>0) and (y<0) then writeln (В 4)
if
(x<0) and (y>0) then writeln (Во 2)
else
(x<0) and (y<0) then writeln (В 3);
end.
пишет что
Встречено and, а ожидалось ;
где ошибка? Буду очень благодарна

Ответ оставил Гость

Program vika;
var x, y : integer;
begin
writeln (Ведите x);
readln (X);
writeln (Ведите y);
readln (y);
if
(x>0) and (y>0) then writeln ( В 1);
else
if (x>0) and (y<0) then writeln (В 4);
if
(x<0) and (y>0) then writeln (Во 2);
else
if (x<0) and (y<0) then writeln (В 3);
end.
немного исправил.