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

Question

Информатика

Устин

13 августа, 18:11

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

+4

Ответы (1)

Знаете ответ?

Исаак · Answer 1

Var l:integer;

l1:real;

lm:integer;

begin

write ('Введите расстояние в сантиметрах ') ;

read (l) ;

l1:=l/100;

lm:=trunc (l1) ; / / округляет значение до близжайшего вычитая из него - 0.5

writeln (lm,' метров') ;

end.