Дан массив b[1..n] n< =100 заполнить эл.массивы о формуле b[i]: = i^{2} -4 . вывести полученные значения на экран. !

Program s; var b: array[1..100] of integer; i,n: integer; begin read(n); for i: =1 to n do begin b[i]: =i*i-4; writeln(b[i]); end; end.

Решение: разделим число  513  на  два  ( 2 - это основание системы счисления). делить будем с остатком, частное запишем в столбец "част.", а остаток в столбец "ост.". затем полученное частное снова разделим на  два  и новое частное и остаток также распределим по столбцам (см. ниже). повторять деление будем до тех пор, пока последнее частное не окажется меньше двух. част.ост.513 : 2 =256  1256 : 2 =128  0128 : 2 =64  064 : 2 =32  032 : 2 =16  016 : 2 =8  08 : 2 =4  04 : 2 =2  02 : 2 =1  0теперь мы можем записать число  513  в двоичной системе счисления. для этого в старший (самый левый) разряд числа запишем последнее частное (выделено жирным), а в следующие, по порядку, разряды запишем все полученные выше остатки, беря их снизу вверх. то есть, в самом младшем разряде оказывается самый верхний остаток.ответ:         51310  =  10000000012