Просто надо нарисовать блок схему, ! если можете, то на фото есть ещё номера!


1. изобразите блок-схему программы, реализующей алгоритм перевода целых положительных десятичных чисел а (а< 100010) в систему счисления с основанием n (2
2. изобразите блок-схему программы, реализующей алгоритм перевода дробных положительных десятичных чисел а (10-3
3. изобразите блок-схему программы, реализующей алгоритм перевода целых положительных n-ичных (2


​

var

x,y: real;

begin

x: =-1;

while x< =1 do

begin

y: =x*x*x;

writeln(y);

x: =x+0.1;

end;

end.

var

i: integer;

s: real;

m: array[1..2,1..6] of real;

begin

s: =0;

for i: =1 to 6 do

begin

readln(m[1,i]);

readln(m[2,i]);

s: =s+3.14*m[1,i]*m[1,i]*m[2,i]*1200;

end;

writeln(s);

end.

в не указан   шаг изменения x , допустим он равен 1

var

x,y: real;

begin

x: =1;

while x< =10 do

begin

y: =1/x-5;

writeln(y: 8: 2);

x: =x+1;

end;

end.

совершенное число это число равное сумме своих делителей отличных от самого числа

var i, s,j : integer;

begin for i : = 5 to 200 do begin s : = 0; for j : = 1 to i div 2 do if (i mod j = 0) then s : = s + j; if s = i then writeln(i); end; end.