Дано расстояние в см, найдите число полных метров в нем

1 см = 0,01 м

поэтому длину в см делим на 100 и получаем длину в м. и записываете целое число без остатка. 

расстояние в сантиметрах разделить на число сантиметров в одном метре

"солнце" - круг с точкой в центре

"идти" - две ноги

"хлеб" - полукруг

"рот" - сильно вытянутый   полуовал

program xxx;

    var z,d,k : integer;

begin

  z: =2; d: =7; k: =0;

  while (d> =z) do

    begin

      d: =d-z;

        k: =k+1

      end;

  writeln(d,'    ',k);

  readln

end.