Найти ошибки в программе и запишите ее исправленный вариант:
Program контроль;Uses crt;
Var x,y:integer;z:real;
Begin;
x:=5
y:=7.5;
z:=x+y;
Writeln("summa=",z);
Readln;
End.

Program Control;Uses crt;Var x:integer;y,z:real;Begin;x:=5;y:=7.5;z:=x+y;Writeln('summa=',z);Readln;End.