Исправить ошибки в коде - Pascal ABC (14335)

Формулировка задачи:

program zz;
  var
  m:integer;
  s:integer;
  g:integer;
  f:integer;
  p:integer;
    begin
    g:=10;
    writeln('введите количество массы человека');
    readln(m);
    writeln('введите площадь подошвы');
    readln(s);
    f:=m*g;
    writeln(p:=f:s);          Program1.pas(15) : Встречено ':=', а ожидался оператор            почему???
    writeln(p);
    end.

Решение задачи: «Исправить ошибки в коде»

textual
                            Листинг программы 
                        

                            program zz;
  var
  m:integer;
  s:integer;
  g:integer;
  f:integer;
  p:real;
    begin
    g:=10;
    writeln('введите количество массы человека');
    readln(m);
    writeln('введите площадь подошвы');
    readln(s);
    f:=m*g;
    p:=f/s;
             
    writeln(p);
    end.
                        