ОЧЕНЬ СРОЧНО ИНФОРМАТИКА ДАЮ 50Б Преобразовать алгоритм в программу ** языке Паскаль алг...

Question

ОЧЕНЬ СРОЧНО ИНФОРМАТИКА ДАЮ 50Б
Преобразовать алгоритм в программу на языке Паскаль
алг задача
нач цел х,y
ввод х,у
если (х>0) то (у>0)
то вывод " точка принадлежит 1-ой четверти КП"
иначе вывод "точка не принадлежит 1-ой четверти КП"
все
кон

Comments

Ошибка: должно быть не "если (х>0) то (у>0)", а "если (х>0) и (у>0)"

Answer 1

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

program Задача;
begin
  var x,y:integer;
  Read(x,y);
  if (x>0) and (y>0) then
    Writeln('Точка принадлежит 1-ой четверти КП')
  else
    Writeln('Точка не принадлежит 1-ой четверти КП')
end.

Comments

простите,не могли бы Вы мне также помочь?)

---

Для общения на темы, не относящиеся к вопросу или ответу, есть ЛС

Answer 2

Щрщтрщтшжрхщлтрхщштрхщшон