Информатика 10 класс . программирование паскаль.написать процедуру, которая принимает на вход числа m и n и печатает на экране площадь и периметр прямоугольника со сторонами m и n

program yaneznayupascal;

   procedure PS;

  var m, n, S, P : integer;

begin

    write('Введите число m (длина): ');

     readln(m);

    write('Введите число n (ширина): ');

     readln(n);

    S := m*n;

    P := 2*m+2*n;

write('S = ', S);

write('P = ', P);

end;  

begin

 PS;

end.

Постфиксную запись удобно воспринимать как манипуляции со стеком — аналогом длинной трубки с отверстием внизу. в которую можно класть шары, при этом каждый следующий шар проталкивает дальше предыдущие.

Идём по записи
1) 5 — кладём в стек 5
2) 13 — кладём в стек 13
3) 7 — кладём в стек 7
4) - — вытаскиваем из стека два последних шара (13 и 7) и кладём обратно их разность 13 - 7 = 6
5) * — вытаскиваем из стека два последних шара (5 и 6) и кладём обратно их произведение (5 * 6 = 30). 30 и будет ответом.

Эта запись равносильна такой: 5 * (13 - 7)

Постфиксную запись удобно воспринимать как манипуляции со стеком — аналогом длинной трубки с отверстием внизу. в которую можно класть шары, при этом каждый следующий шар проталкивает дальше предыдущие.

Идём по записи
1) 5 — кладём в стек 5
2) 13 — кладём в стек 13
3) 7 — кладём в стек 7
4) - — вытаскиваем из стека два последних шара (13 и 7) и кладём обратно их разность 13 - 7 = 6
5) * — вытаскиваем из стека два последних шара (5 и 6) и кладём обратно их произведение (5 * 6 = 30). 30 и будет ответом.

Эта запись равносильна такой: 5 * (13 - 7)