0 / 0 / 0
Регистрация: 10.03.2023
Сообщений: 6
1

Определить, сколько тонн топлива потребуется для уборки урожая

10.03.2023, 13:28. Показов 198. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Можете сделать программу в паскаль и блок-схему?

В хозяйстве на уборке зерновых задействовано N комбайнов, имеющих
производительность работы F (га/час) и М комбайнов с производительностью
работы Q (га/час). Первому типу комбайнов предстоит убрать площадь S1 (га),
второму – S2 (га). Часовой расход топлива при работе комбайнов составляет XI
и Х2 (л/час) соответственно. Определить, сколько тонн топлива потребуется
для уборки урожая, если удельный вес топлива составляет Р (кг/л) и затраты
хозяйства на топливо, если стоимость 1 тонны топлива составляет Z руб.
Буду сильно благодарен
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
10.03.2023, 13:28
Ответы с готовыми решениями:

Можете сделать блок схему?
Program m1; const a=1.5; b=15.5; x=-2.9; var w,y:real; begin...

Можете сделать блок схему?
program m2; var a,b,c:integer; begin writeln('введите цифры'); readln(a); readln(b);...

Составить блок схему и программу на языке Паскаль z=1/m+m-1/m(x+1)^2
Составить блок схему и программу на языке Паскаль z=1/m+m-1/m(x+1)^2

Создать блок схему и программу на языке Паскаль
а) определите и выведите на экран столбиком все трёхзначные числа, которые делятся одновременно на...

1
2902 / 1552 / 624
Регистрация: 19.03.2019
Сообщений: 5,152
10.03.2023, 14:34 2
Лучший ответ Сообщение было отмечено Dvinus как решение

Решение

часы уборки первой площади: S1 / (N*F)
часы уборки первой площади: S2 / (M*Q)

расход топлива в литрах: часы * Xi
расход топлива в тоннах: (расход топлива в литрах * P)/1000
затраты на топливо: расход топлива в тоннах * Z

отсюда "программа"
Pascal
1
2
3
4
5
6
7
8
9
10
11
var N, M : integer;
  S1, S2, F, Q, X1, X2, P, Z, Zatr : real;
begin
  WriteLn('Enter N, M,  S1, S2, F, Q, X1, X2, P, Z :');
  ReadLn(N, M,  S1, S2, F, Q, X1, X2, P, Z);
 
  Zatr := ((S1 / (N*F))*X1 + (S2 / (M*Q))*X2 ) * P * Z/1000; 
  WriteLn('Zatraty ',Zatr:1:2,' rub');
 
  ReadLn
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.03.2023, 14:34
Помогаю со студенческими работами здесь

Составить программу и блок схему на языке паскаль
Составить программу и блок схему на языке паскаль Y=x^2+k+sqrt(x^2+k) при x=5 k=4

Составить блок-схему алгоритма и программу на языке ПАСКАЛЬ
Составить блок-схему алгоритма и программу на языке ПАСКАЛЬ вычисления значения функции Y=F(x) для...

Составить блок-схему алгоритма и программу на языке Паскаль
Добрый вечер, помогите, пожалуйста с решением задачи составить блок-схему алгоритма и программу...

Составить блок-схему алгоритма и программу на языке ПАСКАЛЬ
Составить блок-схему алгоритма и программу на языке ПАСКАЛЬ вычисления значения функции Y=F(x) для...

Составить блок-схему алгоритма и программу на языке Паскаль
Помогите, пожалуйста, с задачей.

пожалуйста надо написать программу паскаль и составить блок схему
Ввести массив А. Если элемент А положителен, то найти сумму первой половины массива и заменить ею...

Составить блок-схему и программу на языке Паскаль вычисления значений функции
Помогите пожалуйста очень надо! Составить блок-схему и программу на языке Паскаль вычисления...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru