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