решите пожалуйста я не разумею что там сделать

1)
var
a,b:integer;
begin
write('Введите A=');read(a);
write('Введите B=');read(b);
writeln('Сумма 2-ух чисел=',a+b);
writeln('Разность 2-ух чисел=',a-b);
writeln('Творение 2-ух чисел=',a*b);
writeln('Частное модулей=',абс(a)/абс(b):5:2);
end.
2)
var
l,m:integer;
begin
write('Введите значение L=');read(l);
m:= l div 100;
write('Полных метров=',m);
end.