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

Question

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

Comments

Полных <> Целых?

Answer 1

Var i,j:integer;
begin
writeln('Введите расстояние(в сантиметрах)');
readln(i);
j:=i div 100;
writeln('Полных метров = ', j);
end.