Программа по информатике.

Дана масса яблок в ящике, которые надо разложить по пакетам по 3 кг в каждый. Напишите программу, которая вычислит, сколько пакетов получится и сколько килограммов яблок останется. Результат выведите на экран.

Question

Информатика

Лекса

24 июня, 16:51

Программа по информатике.

Дана масса яблок в ящике, которые надо разложить по пакетам по 3 кг в каждый. Напишите программу, которая вычислит, сколько пакетов получится и сколько килограммов яблок останется. Результат выведите на экран.

+3

Ответы (1)

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

Настуня · Answer 1

Задача написана на Pascal

Program Zadacha;

Var pak, mas: real;

Begin

Writeln ('Введите массу яблок') ;

Readln (mas) ; pak:=mas/3;

Writeln ('Необходимо ', pak:4:2,' пакетов') ;

End.