я не понимаю как это сделать я не понимаю как это сделать. Excel ">

прикрепляю ответ в виде документа !

будут во пишите, на все отвечу)

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

program mss; uses crt; var v,m,h,r: real; beginclrscr; writeln('введите радиус'); readln(r); writeln('введите высоту'); readln(h); v: = 3.14*sqr(r)*h; m: = 1200*v; writeln('    ',m: 2: 2,' кг'); readln; end.