Program zadacha;
vara: array[1..10] of integer;i,min,n: integer;
beginn:=0;for i:=1 to 10 do begina[i]:=-5+random(5);write(a[i]:4);min:=a[1];end;
for i:=2 to 10 do beginif min>a[i] then min:=a[i];end;
for i:=1 to 10 do beginif a[i]=min then beginn:=n+1;end;end;
writeln();writeln('min=',min);writeln('n=',n);end.
Microsoft Word, Microsoft Excel, Goole Chrome (браузер), Блокнот, Калькулятор, Пейнтбраш
8 Бит - 1 Байт
1024 Байт - 1 Килобайт
1024 Килобайт - 1 Мегабайт
1024 Мегабайт - 1 Гагабайт
2 Гигабайта = (1024 Мегабайт * 1024 Килобайт * 1024 Байт * 8 Бит) * 2
2 Гигабайта = 17 179 869 184 Бит