1.напишите составные части программы ( структура программы). 2. найдите 5 ошибок в программе: programm sred_geometr; uses crt; var x,y: real. begin writelen(' введите 2 неотрицательных числа'); readln('x,y'); s=sqr(x+y);

1 - Смотри картинку 
2 - programm sred_geometr; правильно - program
     var x,y:real. не нужна точка
     writelen(' введите 2 неотрицательных числа'); правильно - writeln
     Readln('x,y'); в скобках не нужны кавычки
     S=sqr(x+y); должно быть не =, а :=
    
Еще нету end. но это, видимо, опечатка