Известно количество жителей государства и площадь ее территории.определить плотность населения в этом государстве.написать решение в программе паскаль авс

Var p:real;
s,n:integer;
begin
writeln('Введите количество жителей государства(в чел)');
readln(n);
writeln('Введите площадь государства(в км^2)');
readln(s);
p:=n/s;
writeln('Плотность государства равняется ',p:0:0,' чел/км^2');
end.