Задано мощности шести генераторов переменного тока: 5,9,15,27,46 и 60 кВт и соответствующие их массы: 30,52,90,155,270 и 465 кг.

Нужно вычислить значение мощности, приходящейся на единицу массы каждого генератора, кВт / кг.

Програма на паскале.

Question

Информатика

Болеслава

28 декабря, 01:13

Задано мощности шести генераторов переменного тока: 5,9,15,27,46 и 60 кВт и соответствующие их массы: 30,52,90,155,270 и 465 кг.

Нужно вычислить значение мощности, приходящейся на единицу массы каждого генератора, кВт / кг.

Програма на паскале.

+5

Ответы (1)

Знаете ответ на вопрос?

Андронка · Answer 1

Var a:array [1 ... 6] of integer; b:array [1 ... 6] of integer; c:array [1 ... 6] of real; i:integer; begina[1]:=5; b[1]:=30; a[2]:=9; b[2]:=52; a[3]:=15; b[3]:=90; a[4]:=27; b[4]:=155; a[5]:=46; b[5]:=270; a[6]:=60; b[6]:=465; for i:=1 to 6 doc[i]:=a[i]/b[i]; for i:=1 to 6 dowriteln ('кВт/кг ', i,'-го генератора = ', c[i]) ; end.