1 байт = 8 бит . 1 Кбайт = 1024 байта . 1 Мбайт= 1024 Кб .1 Гбайт = 1024 Мб
2 байта = 16 бит
3.ластик 5.заливка 7.указка 8.кисть,а остальные не знаю сорри ♀️♀️♀️
Var
y, x : integer;
begin
readln(x);
if x >= 1 then
y := 1
else if (x > -1) and (x < 1) then
y := 0
else if x < 0 then
y := -1;
writeln(y);
end
Файл во вложении. Если я правильно поняла, то каждый день просрочки начисляется пени. Если книга была больше 30 дней
1.+++-
2.++++
3.++++
4.+---
5.+--+
6.----