Как вы понимаете выражение: каменная летопись - id327062720200401 от ninachka1977 01.04.2020 13:36

Question

Информатика: Как вы понимаете выражение: каменная летопись

ninachka1977 · Accepted Answer

// PascalABC.NET 3.2, сборка 1514 от 11.08.2017
// Внимание! Если программа не работает, обновите версию!

begin
var (x,y):=ReadReal2('Введитие координаты точки');
if (x<0) and (y>0) then Writeln('Точка лежит во II четверти')
else Writeln('Точка не лежит во II четверти')
end.

Пример
Введитие координаты точки -4.6 7
Точка лежит во II четверти

begin
var n:=ReadInteger('Введите двухзначное число');
if n div 10+n mod 10>9 then Writeln('Сумма цифр больше девяти')
else Writeln('Сумма цифр не больше девяти')
end.

Примеры
Введите двухзначное число 47
Сумма цифр больше девяти

Введите двухзначное число 81
Сумма цифр не больше девяти

Как вы понимаете выражение: "каменная летопись"

MOGZ ответил