Известны данные о мощности двигателя 30моделей. Сколько машин мощностью выше 100Лс....

Question

Известны данные о мощности двигателя 30моделей. Сколько машин мощностью выше 100Лс. помогите пожалуйста, очень нужно:)))

Comments

Вопрос неполный. 1) Где эти данные? 2) С помощью какого программного средства решается?

---

массивы.

---

по случайным числам

---

Массивы - это не программное средство, а структура организации данных.

---

Программное средство - это Pascal, C/C++, Basic, Excel...

---

Pascal

Answer 1

Const
  n=30;
var
  i,k,m:integer;
begin
  Randomize;
  Writeln('Заданы мощности:');
  k:=0;
  for i:=1 to n do
  begin
    m:=Random(100)+50;
    Write(m:4);
    if m>100 then k:=k+1
  end;
  Writeln;
  Writeln('Количество машин с мощностью больше 100 л.с. равно ',k)
end.

Тестовое решение:
Заданы мощности:
 147 126  69 149 121 112  69 138 144 135 148 133  86 101 109  82  60 126  80  96  66 113  77  86 147 100 131 146  84  70
Количество машин с мощностью больше 100 л.с. равно 17

Comments

спасибо огромное)

---

пожалуйста