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

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