Есть ответ 👍

Для 16 голов скота на 36 дней требуется 1,92 т сухой подстилки. Сколько сухой подстилки требуется для 20 голов скота на 40 дней?

247
323
Посмотреть ответы 2

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


Для 16 голов скота на 36 дней требуется 1,92 т сухой подстилки. Сколько сухой подстилки требуется для 20 голов скота на 40 дней?

Для 16 голов скота на 36 дней требуется 1,92 т сух


USES Crt;
 VAR
   MAS: ARRAY[1..12] OF REAL;
   I: INTEGER;   MIN,MAX:REAL;
 BEGIN
   ClrScr;
   { Заполнение массива с клавиатуры }
   FOR I:=1 TO 12 DO Begin
     Write(' Введите среднюю температуру за ',I,' месяц ');   ReadLn(MAS[I]);
   End;
   MAX:=MAS[6]; MIN:=MAS[12];
   { Определение самой высокой температуры летом }
   FOR I:=7 TO 8 DO
     IF MAX<MAS[I] THEN MAX:=MAS[I];
   { Определение самой низкой температуры зимой }
   FOR I:=1 TO 2 DO
     IF MIN>MAS[I] THEN MIN:=MAS[I];
   WriteLn(' Самая высокая температура летом ',MAX);
   WriteLn(' Самая низкая температура зимой ',MIN);
 END.

Популярно: Другие предметы