Решите в паскале надо дано расстояние в сантиметрах. найти число полных метров в нём

program qq;
var l,m:integer;
begin
write('Введите число см');
readln(l);
m:=l div 100;
write(...)
readln;
end.