Паскаль
Объяснение:
program ko;
var n: integer; k,p: real;
begin
readln(n);
k:=sqr(n); //квадрат числа n
p:=k*10/2
writeln(p);
readln
end.
Python:
n = int(input())
print(n**2*10/2)
PascalABC.net:
var
n:real;
write(n*n*10/2)
Паскаль
Объяснение:
program ko;
var n: integer; k,p: real;
begin
readln(n);
k:=sqr(n); //квадрат числа n
p:=k*10/2
writeln(p);
readln
end.