Question

Производительность формовочной машины - 7 тарелок в одну минуту. Сколько тарелок выпустят 3 машины, работая t ч.Напечать результат вычисления. Написать программу паскаль!! срочно!!! Заранее спасибо)

Answer 1

Var
  t, n: real;

begin
  Write('Введите время работы в часах: ');
  Readln(t);
  n := Int(t * 60 / 7) * 3; { каждая машина сделает целое количество тарелок }
  Writeln('Будет сделано тарелок- ', n)
end.

Тестовое решение:

Введите время работы в часах: 3.5
Будет сделано тарелок- 90