Известны размеры комнаты: a-длина, b-ширина, h-высота. составьте программу нахождения нахождения площади поверхности стен. площадь окон и дверей не учитывать. значения a, b,h ввести с клавиатуры паскаль

program n_1;

var a, b, h, s1, s2: integer;

begin

    writeln('введите длину, ширину и высоту комнаты');

    read(a, b, h);

    s1: =a*h;

    s2: =b*h;

    writeln('площади 1 и 3 стены равны и равны ', s1, '. площади 2 и 4 стены равны и равны ', s2);

end.

в условии не указано но для кодирования используется фраза "в памяти " при этом для нахождения кода шифрованной буквы нужно к коду исходной буквы прибавить код буквы из предложения к первой букве прибавляем код первой буквы предложения ко второй код второй итд т.

а для расшифровки эти коды нужно вычитать, получаем

в   п   а   м   я

3   17   1 14 33

п   щ     о     я     к

17 27   16   33   17

-

3   17   1     14   33

14 10 15   19     17

м   и   н     с       к

н     щ     ё   п

15   27   7     17

-

3     17   1     14 

12   10   26   3

к     и     е     в