Вот мой код, всё работает норм нужна с написание последнего пункта

Создать 2 таблицы в Базе Данных

Одна будет хранить текстовые данные(1 колонка)

Другая числовые(1 колонка)

Есть список, состоящий из чисел и слов.

Если элемент списка слово, записать его в соответствующую таблицу, затем посчитать длину слова и записать её в числовую таблицу

Если элемент списка число: проверить, если число чётное записать его в таблицу чисел, если нечётное, то записать во вторую таблицу слово: «нечётное»

Если число записей во второй таблице больше 5, то удалить 1 запись в первой таблице. Если меньше, то обновить 1 запись в первой таблице на «hello»

import sqlite3
import random

conn = sqlite3.connect('dz_3.db')
cursor = conn.cursor()
cursor.execute('''CREATE TABLE IF NOT EXISTS tab_1(id INTEGER PRIMARY KEY AUTOINCREMENT, col_1 TEXT)''')
cursor.execute('''CREATE TABLE IF NOT EXISTS tab_2(id INTEGER PRIMARY KEY AUTOINCREMENT, col_1 INTEGER)''')
conn.commit()

Rainbow = [ 'black', 'red', 5, 7, 9, 4]
print(Rainbow)

dlin = 0
for i in Rainbow:
if type(i) is str:
cursor.execute('''INSERT INTO tab_1(col_1) VALUES (?)''', [i])
conn.commit()
elif i % 2:
cursor.execute('''INSERT INTO tab_2 (col_1) VALUES ('нечётное')''')
conn.commit()
k = cursor.fetchall()
print(k)
cursor.execute('SELECT COUNT(*) FROM `tab_2`')
cursor.execute('SELECT COUNT(*) FROM `tab_1`')
result_tab_1 = cursor.fetchall()
result_tab_2 = cursor.fetchall()
print(result_tab_1)
print(result_tab_2)

Program qw;
uses crt;
Type
   Atlas=Record
       country,capital:string;
       area,people:real;
     end;
   ps=File of atlas;
Var f:ps;
    z,t:atlas;
Begin
  assign(f,'1.dat');
  rewrite(f);
    z.country:='Латвия'; z.area:=67.7;
    z.people:=2.6; z.capital:='Рига';
    write(f,z);
    z.country:='Литва'; z.area:=65.2;
    z.people:=3.4; z.capital:='Вильнюс';
    write(f,z);
    z.country:='Польша'; z.area:=313;
    z.people:=34.8; z.capital:='Варшава';
    write(f,z);
    z.country:='Украина'; z.area:=603.7;
    z.people:=50; z.capital:='Киев';
    write(f,z);
    z.country:='Россия'; z.area:=17075.4;
    z.people:=139; z.capital:='Москва';
    write(f,z);
  Close(f);
  assign(f,'1.dat');
  reset(f);
  read(f,t);
  while not(eof(f)) do
    begin
      read(f,z);  
      if t.people/t.area < z.people/z.area then t:=z;
    end;
  close(f);
  writeln('Cтранa с наибольшей плотностью населения:');
  writeln(t.country,' (плотность населения равна ',t.people/t.area:9:6,' млн на кв.км)');
end.

16

Объяснение:

1. Алфавит мощностью 26 символов требует для кодирования символа 5 бит (2⁴ < 26 < 2⁵). 22 символа займут 22×5 = 110 бит = 110 / 8 = 13.75 байта, округляем до целого вверх, получаем 14 байт.

2. Номер года обозначается одним из 100 чисел. 2⁶ < 100 > 2⁷, поэтому для кодирования требуется 7 бит.

3. Номер для обозначается одним из 366 чисел. 2⁸ < 366 > 2⁹, поэтому для кодирования требуется 9 бит.

4. Всего для кодирования срока действия потребуется 7+9 = 16 бит = 16/2 = 2 байта

5. Вся информация на пропуске займет 14+2 = 16 байт