потому что windows обновляется с сайта microsoft (microsoftnetwork) msn и поэтому в россию она проходит долго а в америке быстро
13.2.18 во время обновления windows 10 его хотели сделать самым большим обновлением (революцией windows 10) но билл гейтс не продумал все и сайт лег от перегрузки поэтому там так мало обновлений.
1) program ex; var i:integer ;mas:array [1..10] of integer; begin for i:=1 to 10 do begin mas[i]:=random(9)+1; if (mas[i] mod 2)=0 then mas[i]:=mas[i]+1; end; end. 2)program ex; var i:integer ;mas:array [1..10] of integer; begin for i:=1 to 10 do begin mas[i]:=random(9)+1; if (mas[i] mod 2)=0 then mas[i]:=0; else mas[i]:=mas[i]*3; end; end. 3)program ex; var i:integer ;mas:array [1..10] of integer; begin for i:=1 to 10 do begin mas[i]:=random(9)+1; if (i mod 2)=0 then mas[i]:=(mas[i]*mas[i]); end; end. 4)program ex; var i:integer ;mas:array [1..10] of integer; begin for i:=1 to 10 do begin readln(mas[i]); if (mas[i]<0) then mas[i]:=mas[i]*(-1); end; end.
1) var a:array [1..10] of integer; i:integer; begin writeln('Генерируем массив со случайными числами'); for i:=1 to 10 do begin a[i]:=random(100)+1; write(a[i],' '); end; writeln; writeln('Выполняем действие'); for i:=1 to 10 do begin if (i mod 2 = 0) then a[i]:=0 else a[i]:=a[i]*3; write(a[i],' '); end; readln; end.
2) var a:array [1..10] of integer; i,k:integer; begin writeln('Генерируем массив со случайными числами'); for i:=1 to 10 do begin a[i]:=random(100)+1; write(a[i],' '); end; writeln; writeln('Выполняем действие'); k:=a[1]; a[1]:=a[10]; a[10]:=k; for i:=1 to 10 do write(a[i],' '); readln; end.
потому что windows обновляется с сайта microsoft (microsoftnetwork) msn и поэтому в россию она проходит долго а в америке быстро
13.2.18 во время обновления windows 10 его хотели сделать самым большим обновлением (революцией windows 10) но билл гейтс не продумал все и сайт лег от перегрузки поэтому там так мало обновлений.
как я говорю по малости много.