Нужны ответы на вопросы 1.1 и 1.2.
хотя бы на один из них. ​

ответ: www.schools.it

Объяснение:

.com

коммерческие ресурсы

.net

ресурсы и организации связанные с сетью

.org

некоммерческие организации

.info

информационные узлы

.biz

ресурсы для бизнеса

.name

доменная зона для частных лиц с простой логикой: ваше имя — ваш домен

.aero

домен для членов Авиационного сообщества и их потребителей

.arpa

домен используемый исключительно для инфраструктуры интернета

.edu

ВУЗ-ы США

.int

международные организации

.gov

правительственные организации США

.mil

военные ведомства США

.coop

кооперативы и организации их обслуживающие

.museum

музеи, учреждения и частные лица, имеющие отношение к музейному делу

.mobi

сайты для мобильных устройств

.pro

домен верхнего уровня для сайтов, представляющих специалистов разных областей (инженеров, врачей, юристов…)

.tel

онлайн-визитка на базе DNS для автоматической генерации страницы с контактной информацией

.travel

индустрия путешествий, экскурсий и отдыха: турагентства, туроператоры и т.д.

Var 
a: array[1..n] of integer; 
k, i, m: byte; 
min: integer;

begin 
Write('Razmer massiva: '); 
Readln(k); 
if (k < 0) or (k > 100) then     
begin       
Writeln('Razmer dolzhen byt bolshe 0 i menshe 100');       
Readln;       
Exit;     
end; 
Randomize; 
Writeln('Ishodn. massiv: '); 
for i:=1 to k do     
begin       
a[i]:=Random(101)-50;       
write(a[i]:4);     
end; 
min:=a[1]; 
for i:=2 to k do   
if a[i] < min then       
begin         
min:=a[i];         
m:=i;       
end; 
a[m] := a[1]; 
a[1] := min; 
Writeln; 
Writeln('Min element = ', min:4, ' v posicii ', m:3); 
Writeln('Rezult. massiv: '); 
for i:=1 to k do     
write(a[i]:4); 
readln;
end.