Паскаль. Основы программирования

       

Блок-схемы, изображающие условные операторы


Вы уже знаете, что составление программы можно изображать геометрическими фигурами - блоками, в результате чего образуется схема программы. Такая конструкция называется блок-схемой.

Какой геометрической фигурой принято обозначать условие? Посмотрите на ниже приведенную конструкцию и вы увидите, что условие изображается ромбом (см. рис. 17).

Рис. 17

Пример 4. Два прямоугольника заданы длинами сторон. Написать программу, после выполнения которой выясняется, можно ли первый прямоугольник целиком разместить во втором. (Рассмотреть только случай, когда соответствующие стороны прямоугольников параллельны.)

Математика этой задачи проста, возможные случаи изображены на рисунке 18, блок-схема на рис. 19:

Рис. 18

Рис. 19

Пользуясь блок-схемой составим программу

Program Problem4;

    uses WinCrt;



    var

       a1, b1, a2, b2 : real;

    begin

       write('Введите длину и ширину первого прямоугольника ');

       readln(a1, b1);

       write('Введите длину и ширину второго прямоугольника ');

       readln(a2, b2);

        if ((a1 < a2) and (b1 < b2)) or

((b1 < a2) and (a1 < b2))

           then  writeln('Первый прямоугольник размещается во втором')

           else   writeln('Первый прямоугольник не размещается во втором')

    end.




Содержание раздела