Для решения данной задачи можно использовать операции деления нацело (div) и нахождения остатка (mod). Дана масса в граммах, и нужно перевести ее в килограммы и граммы.
Программа может выглядеть следующим образом:
var масса: integer
var килограммы: integer
var граммы: integer
масса := 1250
килограммы := масса div 1000
граммы := масса mod 1000
write(килограммы, " кг ", граммы, " гр")
В этом примере предполагается, что значение массы уже задано и равно 1250 граммов. Затем происходит деление нацело на 1000, чтобы получить количество килограммов, и нахождение остатка от деления на 1000, чтобы получить количество граммов. Результат выводится на экран с помощью функции write.
Масса 1250 граммов будет равна 1 кг 250 гр.
