16 = 2
8 = 64
1 = 1000
4 = 500
Пользовалась таблицей
там не понятно фоткать научись
Var
a,b,c:integer;
x,y,z:string;
begin
writeln('Введите стороны треугольника');
readln(a,b,c);
x:='равнобедренный';
y:='равносторонний';
z:='разносторонний';
begin
if (c=b) and (a<>c) then
writeln('Треугольник',' ',x);
if (a=c) and (a<>b) then
writeln('Треугольник',' ',x);
if (a=b) and (a<>c) then
writeln('Треугольник',' ',x);
if (a=b) and (a=c) and (b=c) then
writeln('Треугольник',' ',y);
if (a<>b) and (a<>c) and (b<>c) then
writeln('Треугольник',' ',z);
end;
readln
<span>end.</span>
1) 16 = 2⁴
2) 4 * 1024 = 4096 бит в секторе
3) 9 * 4096 = 36864 бит в дорожке
4) 180 * 8 * 1024 = 1474560 бит на всём диске
5) 1474560 / 36864 = 40 дорожек
Write (ndivm +1)
Если не поймете - прокомментирую