Скорость распространения звука в воздухе в зависимости от температуры может быть найдена приближенно по формуле v=331+0,6t, где v — скорость (в метрах в секунду), t — температура (в градусах Цельсия).
Найди, с какой скоростью распространяется звук в летний день при температуре 17,2°С
Program ob; procedure GetVolume(); var r: real; begin write('r = '); readln(r); writeln('Объём: ', V(r)); end; function V(r: real): real; begin V := 4 * 3.14 * (r * r * r) / 3; end; begin GetVolume(); end.