1) Program lapy; var lapy:integer; Begin Writeln('Сколько лап?'); Readln(lapy); If lapy=0 then Writeln('Это рыба'); if lapy=2 hten Writeln('Это птица'); if lapy=4 then Writeln('Это лось'); if lapy=6 then Writeln('Это жук'); if lapy=8 then Writeln('Это паук'); end. 2) Program kinotheatr; var mesto:integer; Begin Writel('Укажите Ваше место:'); Readln(mesto); if (mesto>=1) and (mesto<=10) then Writeln('Цена 150р.'); if (mesto>=11) and (mesto<=15) then Writeln('Цена 100р.'); if (mesto>=16) and (mesto<=20) then Writeln('Цена 75р.'); End.
Тут, во-первых, не понятно о каких именно таблицах идет речь
Для таблиц баз данных: Строка(несколько вариантов), целое(несколько вариант), с плавающей запятой (несколько вариантов), логичесого типа, дата, датавремя, время и двоичные данные или blob
Для электронных таблиц типа Excel: строка, ссылка, гиперссылка, целое число, дробное число, проценты, денежные единицы, дата, дата-время, время, формула. Так же ячейка может содержать дополнительные данные типа личного имени, комментария, форматирование, цвет фона и тд
