Тело массой m кг падает в воздухе вниз с ускорением a м/с^2. составьте программу для определения силы сопротивления воздуха. масса тела m ускорение a вводятся с клавиатуры. указание. при падении тела в воздухе сила сопротивления воздуха вычисляется по формуле f=mg-ma, где m- масса тела, g=9.8 м/с^2, a - ускорение, с которым падает тело.
m,g,a:real;
Begin
Write('Введите массу и ускорение (Через пробел) ');
Readln(m,a);
g:=9.8;
Write('Сила сопротивления воздуха равна ',m*g-m*a);
End.