Если просто надо убрать легенду, просто щелкните мышкой на ней и там должно появиться сообщение типа ОЧИСТИТЬ ЛЕГЕНДУ
<span>-----------------------------------Исполнитель----------------------------</span>
Программа:
var i: Integer;
a: real;
begin
for i:=1 to 12 do a:=a+sqrt(i);
writeln(a);
end.
Program p1;
var a,b:integer;
begin writeln('Введите два числа');
readln(a,b);
if a=b
then writeln('Числа равны')
else if a<b
then writeln(1)
else writeln(2);<span>end.</span>