Составьте таблицу описания типов и форматов для всех полей базы данных домашняя библиотека таблица базы данных должна содержать не
менее восьми более Приведите пример заполненной таблицы соответствующей заданной структуре не менее 10 записи​

Гарантируется правильная работа программы при вводе натуральных чисел, не превышающих 9 223 372 030 926 249 001

var
  i,n,m:int64;
begin
  Write('Вводите: ');
  Read(m);
  n:=0;
  for i:=1 to m div 2 do
    begin
      n:=n+2*i-1;
      if (n>=m) then break
    end;
  if n=m then Writeln('Кв.корень(',m,')=',i)
  else Writeln('Кв.корень(',m,') не является целочисленным')
end.

Примеры работы программы

Вводите: 255240500157504
Кв.корень(255240500157504)=15976248

Вводите: 225
Кв.корень(225)=15

Вводите: 56846356333463
Кв.корень(56846356333463) не является целочисленным

Вводите: 9223372030926249001
Кв.корень(9223372030926249001)=3037000499

Def generate_number():
    return lambda random_seed: (random_seed*693 + 5)%100
number = generate_number()
def numbers():
    i = 0
    while True:
        elem = number(i)
        if elem != 0:
            yield elem
            i += 1
        else:
            break

print sum(1 for x in numbers() if x % 7 == 0)


numbers - генерирует последовательность из условия
(x for x in iterable if cond(x)) - генерирует последовательность элементов interable, удовлетворяющих условию cond(x) /можно записать и через filter/