Вопрос задан 31.07.2018 в 21:02. Предмет Информатика. Спрашивает Кирилл Васильев.

На паскале. Производительность формовочной машины - N тарелок в минуту. Сколько тарелок произведут

M машин за T часов?
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Попков Александр.
Program factory;
var
    n, m, t: integer;
 
begin
 
    write (' введите N: '); readln (n);
    write (' введите M: '); readln (m);
    write (' введите T: '); readln (t);
    t := t*n*m*60;
    writeln (t);

end.
0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Для решения данной задачи на Паскале, мы можем использовать следующий алгоритм:

1. Запросить у пользователя значения N (производительность формовочной машины в тарелках в минуту), M (количество машин) и T (количество часов). 2. Вычислить общую производительность всех машин за T часов, умножив производительность одной машины на количество машин и на количество минут в T часах. 3. Вычислить общее количество произведенных тарелок, разделив общую производительность на производительность одной тарелки в минуту.

Вот пример кода на Паскале, реализующий этот алгоритм:

```pascal program ProizvoditelnostFormovochnoiMashiny;

var N, M, T: Integer; proizvoditelnost, kolichestvoTarelok: Integer;

begin // Ввод значений N, M и T Write('Введите производительность формовочной машины (N): '); Readln(N); Write('Введите количество машин (M): '); Readln(M); Write('Введите количество часов (T): '); Readln(T);

// Вычисление общей производительности всех машин за T часов proizvoditelnost := N * M * 60 * T;

// Вычисление общего количества произведенных тарелок kolichestvoTarelok := proizvoditelnost div N;

// Вывод результатов Writeln('Общая производительность всех машин за ', T, ' часов: ', proizvoditelnost, ' тарелок'); Writeln('Общее количество произведенных тарелок: ', kolichestvoTarelok, ' тарелок');

Readln; end. ```

После запуска программы, она запросит у пользователя значения N, M и T, а затем выведет общую производительность всех машин за T часов и общее количество произведенных тарелок.

Примечание: Поскольку в поисковых результатах не было найдено конкретной информации о производительности формовочной машины, я не могу предоставить точные значения для N. Пожалуйста, уточните это значение, чтобы я мог предоставить более точный ответ.

0 0

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос