Дана масса М в килограммах. Используя операцию деления нацело, найти количество полных центров и тонн в ней

Question

Информатика

Оля

13 июня, 21:39

Дана масса М в килограммах. Используя операцию деления нацело, найти количество полных центров и тонн в ней

+2

Ответы (1)

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

Сильвестра · Answer 1

Var a, b, m:real;

Begin

Writeln ('введите число') ;

Readln (m) ;

A:=m div 100;

b:=m div 1000;

Writeln ('центнеров', a,'тонн', b) ;

Readln;

End.