предшественники информатики: поэтика, риторика, семиотика, герменевтика. Термины «информология» и «информатика» предложены в 1962 году членом-корреспондентом АН СССР Александром Харкевичем. Основы информатики как науки были изложены в книге «Основы научной информации» 1965 года, которая была переиздана в 1968 году, под названием «Основы информатики». Информация - представление, понятие о чём-либо» ← informare «придавать вид, форму, обучать; мыслить, воображать. Объяснить эту фразу можно так: знание – сила, потому что в знание есть полезная информация, позволяющая выигрывать на жизненном пути. Знание – лучше силы, потому что позволяет жить более гармонично, достойно, при правильном подходе, постоянно приумножаясь. гимн, конституция, флаг, герб
Объяснение:
// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a := ArrRandom(ReadInteger('n='), 1, 100); a.Println; // общее
Println('Максимальный четный ', a.Where(t -> t.IsEven).Max); // задача 1
Print('Второй минимальнывй нечетный'); // задача 2
a.Where(t -> t.IsOdd).OrderDescending.Skip(1).Take(1).Println // задача 2
end.
Пример
n= 15
67 8 60 1 96 40 73 25 39 93 64 89 40 69 9
Максимальный четный 96
Второй минимальнывй нечетный 89
1)
l = []
for i in range(1, int(input('Длина списка ')) + 1):
if i % 2 == 0:
l.append(1)
else:
l.append((i-1) % 5) #нумерация идет с 0, если надо обычно, убери -1
print(l)
2)
l = []
for i in range(int(input('Длина списка '))):
l.append((i)**2) #нумерация идет с 0, если надо обычно, добавь после i +1, то есть i+1
print(l)
3)
l = []
for i in range(int(input('Длина списка '))):
if l == []:
l.append(2) #1 не простое и не составное
elif l == [2]:
l.append(3)
else:
num = l[-1]
while True:
num += 2
for i in range(2, num // 2 + 1):
if num % i == 0:
break
else:
l.append(num)
break
print(l)