1) <span>111101
2) </span><span>924
3) 121
4) 70
5) 20
6) 95
сорре без решения
</span>
А) 2 сущности: Магазин и Автомобиль
б) Свойства:
Магазин: Название, Площадь, Адрес, Продавец, Телефон, Директор
Автомобиль: Модель, Производитель, Цена, Количество, Размеры, Цвет, дата изготовления
в) Связи:
<span>• 1:1 (один-к-одному)
</span><span>• N:1 (многие-к-одному)
</span><span>• N:M (многие-ко-многим)
</span><span>• 1:N (один-ко-многим)</span>
Что нужно сделать чтобы вообще получить 21?
Прийти к нему из чисел 24 или 16.
В 24 мы можем прийти из 30 два раза сходив назад.
В 16 за три отхода назад на 3 прийти нельзя
-> ответ 3
вперед 5 6 раз
назад 3 3 раза
<span>a,b:integer;
d:string[45];
begin
SetConsoleOutputCP(1251);
writeln('Введите число в диапазоне от 1 дo 100');
write('a=');
readln(a);
b:=a mod 10;
a:=a div 10;
case b of
0: d:='';
1: d:='I';
2: d:='II';
3: d:='III';
4: d:='IV';
5: d:='V';
6: d:='VI';
7: d:='VII';
8: d:='VIII';
9: d:='IX';
end;
b:=a mod 10;
a:=a div 10;
case b of
0: d:=''+d;
1: d:='X'+d;
2: d:='XX'+d;
3: d:='XXX'+d;
4: d:='XL'+d;
5: d:='L'+d;
6: d:='LX'+d;
7: d:='LXX'+d;
8: d:='LXXX'+d;
9: d:='XC'+d;
end;
b:=a mod 10;
a:= a div 10;
case b of
0: d:=''+d;
1: d:='C'+d;
end;
writeln('B Римской системе счисления ' ,d);
readln;
end.</span><span> </span>
Вроде так, но без конкретных примеров сложно проверить