static void Main()
{
double a = float.Parse(Console.ReadLine()),
b = float.Parse(Console.ReadLine()),
c = float.Parse(Console.ReadLine()),
d;
if (a > b) swap(ref a, ref b);
if (b > c) swap(ref c, ref b);
if (a > b) swap(ref a, ref b);
if (b > c) swap(ref c, ref b);
d = Math.Sqrt(Math.Pow(a, 2) + Math.Pow(b, 2));
if (a + b <= c)
{
Console.WriteLine("Нет ▲");
}
else
{
if (d == c)
Console.WriteLine("Прямоугольный");
else
if (d < c)
Console.WriteLine("Тупоугольный");
else
Console.WriteLine("Остроугольный");
}
Console.ReadKey(false);
}
private static void swap(ref double a, ref double b)
{
double c = a;
a = b;
b = c;
}
m - массив элементов
n - количество элементов в множестве (длина массива)
e - конечный массив
e=[]
m=[0, 1, 2, 3, 4]
n=len(m)
k=2
for i in range (n**k):
j=i
c=[]
while j>0:
c.append(m[j%n])
j//=n
c=c+[m[0]]*(k-len(c))
e.append(c)
print(e)
Взять саженец←←←←←←←←←←←←←
↓ ↑ ↑
Саженец качественный → нет ↑
↓ ↑
Да ↑
↓ ↑
Выкопать ямку ↑
↓ ↑
Удобрить ↑
↓ ↑
Посадить саженец→→→→→→→→→→→→
Var
arr : array [1..30] of integer;
sum, count, i, a : integer;
begin
read (a);
for i := 1 to 30 do read (arr[i]);
count := 0; sum := 0;
for i := 1 to 30 do
begin
if arr[i] < 0 then sum := sum + arr[i]
else if (arr[i] > 0) and (arr[i] <= a) then count := count + 1;
end;
writeln (sum, ' ', count);
end.
var
arr : array [1..30] of integer;
i : integer;
begin
for i := 1 to 30 do read (arr[i]);
for i := 30 downto 2 do
if arr[i] * arr[i - 1] < 0 then // проверка знака
begin
writeln (i - 1);
halt; // Остановка программы
end;
writeln ('-1'); // Таких нет
end.
История Интернета началась с разработки компьютеров в 1950-х годах. Первоначальные концепции сетевых пакетов возникли в нескольких научных лабораториях в США, Великобритании и Франции. Уже в 1960-х годах Министерство обороны США заключило контракты на пакетные сети, включая разработку ARPANET. Первое сообщение через ARPANET было отправлено из лаборатории компьютерных наук профессора Леонарда Клейнрока (Калифорнийский университет в Лос-Анджелесе) на второй сетевой узел в Стэнфордском исследовательском институте[en].
Сети пакетной коммутации, такие как ARPANET, NPL[en], CYCLADES, Merit Network[en], Tymnet[en] и Telenet[en], были разработаны в конце 1960-х и начале 1970-х годов с использованием различных протоколов передачи данных. Сначала в Национальной физической лаборатории Великобритании Дональд Дэвис[en]разработал сеть пакетной коммутации, ставшей испытательной моделью для британских исследований почти на два десятилетия. Создание проекта ARPANET привело к разработке протоколов межсетевого взаимодействия, в которых несколько отдельных сетей могли быть объединены в единую «сеть сетей».
В 1981 году, когда Национальный научный фонд (NSF) финансировал компьютерную сеть CSNET, доступ к ARPANET был расширен. В 1982 году в качестве стандартного сетевого протокола на ARPANET был представлен стек протоколов (TCP/IP). В начале 1980-х годов NSF финансировал создание в нескольких университетах национальных вычислительных центров с суперкомпьютерами, а в 1986 году обеспечил взаимную связность с сетью проекта NSFNET, который также создал сетевой доступ к суперкомпьютернымсайтам из научно-исследовательских и образовательных организаций в Соединённых Штатах. Коммерческие интернет-провайдеры начали появляться в конце 1980-х годов. В 1990 году проект ARPANET был закрыт. Ограниченные частные подключения к частям Интернета от официально коммерческих организаций возникли в нескольких американских городах к концу 1989 и 1990 году[6]; в 1995 году был закрыт проект NSFNET, тем самым были устранены последние ограничения на использование и коммерческое обеспечение связи в Интернете.
В 1980-х годах исследования британского учёного Тима Бернерса-Ли в ЦЕРН в Швейцарии привели к созданию Всемирной паутины путём соединения гипертекстовых документов в информационную систему, доступную из любого узла сети. Начиная с середины 1990-х годов Интернет имеет кардинальное влияние на культуру, торговлю и технологии, в том числе за счёт распространения практически мгновенного общения через электронную почту, мгновенного обмена сообщениями, телефонной связи по интернет-протоколу, телефонных звонков, видеосвязи, а также Всемирной паутины с дискуссионными форумами, блогами, социальными сетямии интернет-магазинами.
Исследовательские и образовательные сообщества продолжают использовать и развивать передовые сети, такие как сверхскоростной сетевой сервис Backbone[en], Интернет2 и National LambdaRail[en]. Всё большее количество информации передаётся на высоких скоростях по оптоволоконным сетям, работающим со скоростью 1 Гбит/с, 10 Гбит/с и выше. Захват Интернетом сферы глобальной связи был практически моментальным по историческим меркам: в 1993 году он передавал лишь 1 % информации, проходящей через двусторонние телекоммуникационные сети, 51 % в 2000 и более чем 97 % дистанционной информации в 2007 году. В настоящее время Интернет продолжает развиваться, чему способствует всё большее количество информации в режиме онлайн, сетевой торговли, развлечений и социальных сетей.Но на самом деле первый интернет появился ещё в СССР, тогда и был создан первый советский домен .su, а именно в 1991 году. Тогда ещё не было браузеров, сетью пользовались в основном технари, а именно с появлением первого браузера WorldWideWeb интернет стал красочным и наглядным.