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

Question

Валяка

26 августа, 03:14

+3

Ответы (1)

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

Авксентий · Answer 1

Var i, j:integer;

begin

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

readln (i) ;

j:=i div 100;

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

end.