Лабораторная работа № 2. Линейные алгоритмы: логические выражения Вариант 7.

Задание 1. Дано условие задачи и программа, ее решающая. Предложить набор тестов для проверки работоспособности программы.
Составить программу, печатающую значение TRUE, если указанное высказывание является истинным, и FALSE в противном случае:

1. Среди чисел a, b, c есть хотя бы одна пара взаимно противоположных чисел.

Var a, b, c : integer;
Begin
      Writeln(‘a, b, c? ‘);     Readln(a, b, c);
      Writeln( (a=-b) or (b=-c) or (a=-c) )
End.
Задание 2. Дана программа, содержащая синтаксические и алгоритмические ошибки или пропуски. Указать строки, содержащие эти ошибки и их содержание. Исправить их. Если есть пропуски, заполнить их. Представить правильный вариант программы.
Составить программу, которая печатает true, если точка с координатами (x, y) принадлежит закрашенной области, и false в противном случае.
Задание 3. Решить задачу. Составить программу, печатающую значение TRUE, если указанное высказывание является истинным, и FALSE в противном случае:
X — отрицательное целое число, делящееся на K нацело.
Задание 4. Составить программу, которая печатает true, если точка с координатами (x, y) принадлежит закрашенной области, и false в противном случае.
Все задания решены на Pascal