Определить, какую площадь уберут комбайны за заданное количество дней

@Refani · Регистрация: 10.03.2023

Author24 — интернет-сервис помощи студентам

Очень нужно написать программу в PascalABC.
Условие: Для уборки урожая используется К комбайнов производительностью А (га/час) и Р комбайнов производительностью В (га/час). Продолжительность рабочего дня комбайнов составляет Z часов, время для ежедневного технического обслуживания каждого комбайна – S часов. Определить, какую площадь уберут комбайны за К дней, если 1 комбайн производительностью А
не работал два дня, а 1 комбайн производительностью В не работал три дня.

@Cyborg Drone · 11.03.2023, 02:28

В Pascal ABC? Точно-точно? А чего же тогда пишете в Pascal ABC.NET? Это совершенно разные диалекты паскаля.

И ещё странность... И комбайнов K, и дней K. Пусть будет T дней.

Для Pascal ABC.NET:

Pascal

##
  var (k, a, p, b) := (ReadlnInteger('K ='), ReadlnReal('A ='), ReadlnInteger('P ='), ReadlnReal('B ='));
  var (z, s, t) := (ReadlnReal('Z = '), ReadlnReal('S = '), ReadlnInteger('T = '));
  $'Убранная площадь: {(z - s) * (a * (k * t - 2) + b * (p * t - 3))} га'.Println

Если нужно для Pascal ABC, то возьмите решение по этой сылке: Определить, какую площадь уберут комбайны за заданное количество дней

@Refani 0 / 0 / 0 Регистрация: 10.03.2023 Сообщений: 1
		1
	Определить, какую площадь уберут комбайны за заданное количество дней 10.03.2023, 19:38. Показов 320. Ответов 1 Метки pascaclBl abc net, pascal, Pascal (Паскаль), pascal abc.net., pascal abc, pascal abc net, pascal abc.net (Все метки) Очень нужно написать программу в PascalABC. Условие: Для уборки урожая используется К комбайнов производительностью А (га/час) и Р комбайнов производительностью В (га/час). Продолжительность рабочего дня комбайнов составляет Z часов, время для ежедневного технического обслуживания каждого комбайна – S часов. Определить, какую площадь уберут комбайны за К дней, если 1 комбайн производительностью А не работал два дня, а 1 комбайн производительностью В не работал три дня. 0

	11.03.2023, 02:28