Задать вопрос
12 августа, 17:17

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

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

+4
Ответы (1)
  1. 12 августа, 18:48
    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 дана масса в граммах. переведите ее в килограммы и граммы ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике