ответ на Pascal:
const N = 15;
var a: Array[1..N] of integer;
i,j,k: integer;
begin
for i := 1 to N do begin
a[i] := random(-66) + 50;
write(a[i],' ');
end;
writeln();
j := N-1;
while j > 0 do begin
for i := 1 to j do begin
if a[i] < a[i+1] then begin
k := a[i];
a[i] := a[i+1];
a[i+1] := k;
end;
end;
j := j-1;
end;
for i := 1 to N do begin
write(a[i],' ');
end;
end.
ответ на Python:
from random import randint
n = 15
a = [randint(-15,50) for i in range(n)]
print(a)
for j in range(n-1, 0, -1):
for i in range(j):
if a[i] < a[i+1]:
k = a[i]
a[i] = a[i+1]
a[i+1] = k
print(a)
Какое минимальное количество компьютеров может быть в локальной сети?
мин. 2 компьютера
Какие подключения к сети интернет вы знаете?
коммутируемый доступ;
доступ по выделенным линиям;
доступ по широкополосной сети (DSL - Digital Subscriber Line);
доступ к Интернет по локальной сети;
спутниковый доступ в Интернет;
доступ к Интернет с использованием каналов кабельной телевизионной сети;
беспроводные технологии.
По заданным доменным именам определите, какой стране принадлежит сайт:
где фото или что нибудь другое?
Объяснение: