Ответы

Program zadacha;
varm,g,a,F:real;
beging:=9.8;writeln('vvedite massu i uskorenie');readln(m,a);F:=m*g-m*a;writeln('F=', F, ' H');end.

Нет комментариев
Program zadacha;
varm,g,a,F:real;
beging:=9.8;writeln('vvedite massu i uskorenie');readln(m,a);F:=m*g-m*a;writeln('F=', F, ' H');end.