Дано расстояние L в сантиметрах. Используя операцию деления нацело, найти количество полных метров в нем (1 метр = 100 см) — Pascal(Паскаль)

var l,m:integer;
begin
write('Введите расстояние в см');
readln(l);
m:=l div 100;
write('Расстояние ',l,' метры ',m);
readln;
end.

Leave a Comment

61 + = 63