Как оформляются функции в тексте программы?

запускаем одновременно часы в 8 минут и 3 минуты -  (8 и 3). после окончания 3-х минут переворачиваем их и продолжаем у нас будет (5 и 3). после окончания  вторых 3-х минут в восьмиминутных часах останется 2 минуты (2 и 3). снова запускаем 3-х минутные чесы вместе с оставшимися 2-х минутными. после окончания  2 минут в восьмиминутныхъ часах в 3-х минутных останется 1 минута (0 и 1). начиная с этой минуты запустив 2 раза трехминутные часы получаем искомые 7 минут. 

старше будет девочка потому что там написано втрое

программа №4program str999; uses crt; var s: string; begin writeln('введіте фразу'); read(s); if (s='край озер') then writeln ('край озер лесов и рек'); if (s='я учусь в школе') then writeln ('я учусь в 10-м классе') end.

№5program p_1; uses crt; var s: string; begin writeln('введите фразу'); read(s); if (s='моя родина беларусь') then writeln ('беларусь моя родина'); if (s='люблю цябе мой родны кут') then writeln ('мой родны кут люблю цябе') end.  

program mss; uses crt; var v,m,h,r: real; beginclrscr; writeln('введите радиус'); readln(r); writeln('введите высоту'); readln(h); v: = 3.14*sqr(r)*h; m: = 1200*v; writeln('    ',m: 2: 2,' кг'); readln; end.