C)сетевым;
a)в XIX ;
d)интегральные микросхемы
В программе алгоритм неверный, так дубликаты не найти.
Поэтому программа в основном переделана.
var
n:integer;
a:array[0..9] of boolean;
d,i:byte;
r:boolean;
begin
Writeln('Введите натуральное число'); Readln(n);
for i:=0 to 9 do a[i]:=False;
r:=False;
while n>0 do begin
d:=n mod 10;
if a[d] then begin
r:=True;
break
end
else a[d]:=True;
n:=n div 10
end;
if r then Writeln('да')
else Writeln('нет')
end.
9 бит, 16 бит, 8192 бит, 1байт, 16 байт, 2 кб
Чесно говоря это скорее не таблица а вьюшка.
Нет первичного ключа, много символьных полей с одинаковым значением забитых вручную, что вообще говоря не оптимально и чревато ошибками.
Это вьюшка таблицы которая содержит ссылки на таблицы Классы, Предметы. а так же поле Дата и поле Проведена (логическое)
<span>AB=10*161+11*160=160+11=171</span>