Помогите составить программу в паскале! Дао расстояние в см. Найти полных м в нем.

Question

Корнелия

29 ноября, 02:13

+5

Ответы (1)

Знаете ответ на вопрос?

Герасим · Answer 1

Var i, j:integer;

begin

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

readln (i) ;

j:=i div 100;

writeln ('Полных метров = ', j) ;

end.