Program Boolean5;
Var
A, B: Real;
Begin
ReadLn(A, B);
WriteLn((A >= 0) Or (B < -2));
ReadLn;
end.
Похожие записи/страницы:
- Даны два целых числа: A, B. Проверить истинность высказывания: «Справедливы неравенства A > 2 и B ≤ 3» - Pascal(Паскаль)
- Даны два целых числа: A, B. Проверить истинность высказывания: Справедливы неравенства A ≥ 0 или B < –2» -…
- Проверить истинность высказывания: «Справедливы неравенства A > 2 и B» - Pascal(Паскаль)
- Проверить истинность высказывания: «Треугольник со сторонами a, b, c является равносторонним» - Pascal(Паскаль)
- Проверить истинность высказывания: «Точка с координатами (x, y) лежит в первой или третьей координатной…
- Проверить истинность высказывания: «Точка с координатами (x, y) лежит во второй координатной четверти» - Pascal(Паскаль)
- Проверить истинность высказывания: «Точка с координатами (x, y) лежит в четвертой координатной четверти» -…
- Проверить истинность высказывания: «Точка с координатами (x, y) лежит во второй или третьей координатной…