Ответ:
1 638,4 секунды
Объяснение:
5242880 бит/с = 2^20*5 бит/с = 2^17*5 байт/с=2^7*5 КБ/с
1 ГБ=2^10 МБ = 2^20 КБ
t= 2^20/(2^7*5)=2^13/5=8192/5=1 638,4 секунд
Ответ:
можно больше объяснений пожалуйста
Uses crt;
var s,i,x : integer;
begin
Read(x);
For i:=1 to 5 do begin
s:=s + (x mod 10);
x:=x div 10;
end;
Write (s);
end.
Язык - ПаскальABC
Если хочешь можешь еще сделать проверку на пятизначное число.
//PascalABC.Net 3.2
begin
var a:=arrrandom (readinteger('n ='), -15, 15); a.Println;
var b: array of integer;
for var i:=0 to length(a)-1 do if not((a[i]<0) or ((a[i] mod 8)=0)) then begin
setLength (b, length(b)+1);
b[length(b)-1]:=a[i]
end;
b.Print;
end.
Var n,k:integer;
begin
readln(n);
k:=(n-1) div 1000;
writeln(k);
end.
Пример:
2001
2