с заданием нужно представить через степени основания 10 следующие числа 971 8631 20575

var r,l,s: real; beginwrite('r='); read(r); s: =pi*sqr(r); l: =2*pi*r; write('s=',s,'; l=',l); end.

var a,p: integer; beginread(a); p: =(a mod 10)*(a div 100)*(a mod 100 div 10); write(p); end.

var a,b,c,min: integer; beginwriteln('введи 3 числа'); readln(a,b,c); min: =a; if b< min then min: =b; if c< min then min: =c; writeln(3*min: 4); readln; end.

var

  s: string;

  i: longint;

begin

  readln(s);

for i: =1 to length(s) div 2 do write(s[i]);

end.

сумму чисел один,два,три,четыре,пять разделить на разность чисел 10 и 7.равно пяти.

на листочке чертишь круг,берешь серединку,и получается- 4 клетки вниз и 7 в право