Question

Срочно! напишите программу на языке Паскаль (приложение АВС Pascal)

Дано расстояние L в сантиметрах . Используя операцию деления нацело, найти количество полных метров в нем ( 1 метр = 100 см ) . исходные данные: L ( сантиметров ) : 1026 пример верного решения: L ( полных метров ) : 10
Заранее ОГРОМНОЕ спасибо)

Answer 1

var l:integer;
begin
write ('Введите расстояние L в сантиметрах: ');
readln (l);
writeln('Количество полных метров в нем: ',l div 100)
end.