Программа для перевода сантиметров в метры с помощью div и mod (Паскаль).Заранее спасибо!

Question

Программа для перевода сантиметров в метры с помощью div и mod (Паскаль).Заранее спасибо!

Answer 1

Var a,b,c:integer;
Begin writeln('Введите длину в сантиметрах');
readln(a);
b:=a div 100;
c:=a mod 100;
writeln(a,' см = ', b, ',', c, ' м');
End.

Результат выполнения см. на рисунке

---