Какой план борьбы с Ганнибалом осуществил римский полководец Сципион?

Var m, sm, ml: real;
begin
write('Введите количество метров: ');
readln(m);
sm := m * 100;
ml := m * 1000;
writeln('Метров: ', m, ' Сантиметров: ', sm, ' Миллиметров: ', ml);
end.