Напишите программу определения объёма, который при нормальных условиях займёт кислород, имеющий массу m граммов по формуле v=m/r, где r=1,42897 - плотность кислорода.

Pr0100Chell Pr0100Chell    1   18.09.2019 12:00    0

Ответы
Fenerа Fenerа  21.08.2020 11:00
Var v,m:real;
begin
write('Введите массу кислорода: ');
readln(m);
v:=m/1.42897;
writeln('Объем кислорода массой ',m,' г равен ',v:0:4);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика