Question

Помогите с информатикой. С клавиатуры вводят массу тела и объема. Написать программу, которая находит плотность теле. Решить задачу для исходных данных:

а) масса - 2225 кг ; объём -0,25 м^3

Б) масса -3550 кг; объём -0,5 ^3

Answer 1

===== PascalABC.NET =====

begin

 Writeln('Плотность равна ',

   ReadReal('Задайте массу, кг:') /

   ReadReal('Задайте объем, м^3:'):0:1, ' кг/м^3')

end.

Значения плотностей составят:

а) 8900 кг/м³

б) 7100 кг/м³