Задать вопрос
23 декабря, 11:33

Напишите программы для решения задач. используя div и mod

дана масса в граммах. переведите ее в килограммы и граммы

+5
Ответы (1)
  1. 23 декабря, 11:53
    0
    Var

    m, k, g:integer;

    begin

    Write ('Введите массу в граммах: ') ; Read (m) ;

    k:=m div 1000;

    g:=m mod 1000;

    Writeln (m,' г = ', k,' кг ', g,' г')

    end.

    Пример

    Введите массу в граммах: 23521

    23521 г = 23 кг 521 г
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напишите программы для решения задач. используя div и mod дана масса в граммах. переведите ее в килограммы и граммы ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике