Задать вопрос
28 марта, 15:27

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

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

+5
Ответы (1)
  1. 28 марта, 16:29
    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 дана масса в граммах. переведите ее в килограммы и граммы ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике