var x,y : integer; begin readln (x,y); if (x=0) or (y=0) then begin if x = 0 then writeln ('точка лежит на оси y'); if y = 0 then writeln ('точка лежит на оси x')' end else begin if (x> 0) and (y> 0) then writeln ('точка находится в первой четверти'); if (x< 0) and (y> 0) then writeln ('точка находится во второй четверти'); if (x< 0) and (y< 0) then writeln ('точка находится в третей четверти'); if (x> 0) and (y< 0) then writeln ('точка находится в четвертой четверти'); end; end.
k075ko8
05.04.2020
// pascalabc.net 3.3, сборка 1634 от 14.02.2018 // внимание! если программа не работает, обновите версию! begin var (x,y): =readreal2('введите координаты точки x и y: '); if x=0 then begin if y=0 then writeln('точка лежит в начале координат') else writeln('точка лежит на оси ординат (y)'); exit end else if y=0 then begin writeln('точка лежит на оси абсцисс (х)'); exit end; if x> 0 then if y> 0 then writeln('точка принадлежит i четверти') else writeln('точка принадлежит iv четверти') else if y> 0 then writeln('точка принадлежит ii четверти') else writeln('точка принадлежит iii четверти') end. пример введите координаты точки x и y: 12.4 -7 точка принадлежит iv четверти
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Каким должен быть объем видеопамяти, если графический дисплей работает в режиме 640х480 пикселей, 16 цветов?
объем видеопамяти должен быть 128 мегабайт.