1)60×3=180 сек
2)512000×180=92 160 000(бит)
(1 байт = 8 бит
1 Кбайт = 1024 байт,
1 Мбайт = 1024 Кбайт,)
3)92 160 000/8=11 520 000(байт)
4)11 520 000/1024=11250(Кбайт)
5)11250/1024=10,96(Мбайт)
Ответ 10,96 мегабайт
Photoshop,Gimp 2,На телефоны Glitchr,SLMMSK
//PascalABC.NET 3.2 сборка 1318
Var
ar:array of integer;
i,n,min,k:integer;
begin
readln(n);
setlength(ar,n);
min:=integer.MaxValue;
for i:=0 to n-1 do
begin
readln(ar[i]);
if min>ar[i] then min:=ar[i];
end;
for i:=0 to n-1 do
if ar[i]=min then inc(k);
writeln(k);
end.
Пример ввода:
3
1
2
1
Пример вывода:
2
После строки uses Robot нужно поставить ;
Т.е. первая строка должна иметь вид uses Robot;