var
n1 : real;
n2 : real;
rez : real;
begin
write ('Введите число n1: ');
readlnI(n1);
write ('Введите число n2: ');
readln(n2);
rez := sql(n1)+sql(n2);
writeln('Результат выполнения: ',rez);
end;
