Составьте программу на Паскале для вычисления n+5 для нечётного целого числа n и n^2 для чётного n.
var n:integer;
begin
readln(n);
if n mod 2 = 0 then
writeln(n*n)
else writeln(n+5);
end.
)))))