1.напишите составные части программы ( структура программы).

2. Найдите 5 ошибок в программе:

   programm sred_geometr;

          uses crt;

          var x,y:real.

  Begin

        writelen(' введите 2 неотрицательных числа');

  Readln('x,y');

  S=sqr(x+y);