1)
var a,s:integer;
begin
readln(s);
writeln(‘Длина стороны = «‘ sqrt(s));
writeln(‘Длина диагонали = ‘, sqrt(s)*sqrt(2));
end.
2)
readln(a,b);
writeln(‘Гипотенуза = ‘, sqrt((a*a)+(b*b)));
writeln(‘Площадь = ‘, (a*b)/2);
1)
var a,s:integer;
begin
readln(s);
writeln(‘Длина стороны = «‘ sqrt(s));
writeln(‘Длина диагонали = ‘, sqrt(s)*sqrt(2));
end.
2)
begin
readln(a,b);
writeln(‘Гипотенуза = ‘, sqrt((a*a)+(b*b)));
writeln(‘Площадь = ‘, (a*b)/2);
end.