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 (...
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.
немного исправил.
Не нашли ответ?
Похожие вопросы