Инфа с++

Заполнить двумерный массив следующим образом. Размерность вводится типа n x n.

x=16

ответ: 16 этажей

вроде бы 100*100=10000 бит=1250 байта

поскольку http: \\ftp. не бывает, то ftp: \\schools.ru\program.exe

в блок схемах не сильна

var n: integer;

s,s0: real;

begin

  n: =1;

  s: =10;

  repeat

      n: =n+1;

      s: = s + (100+p)*s0/100;

      s0: =(100+p)*s0/100;

  until s> 200;

  writeln(s);

end.