, есть вот такая программа, нужно сделать так, чтобы числа A не повторялись Program Номер15и2;

var
N, S, I, A: integer;

begin
S:= 0;
readln(N);
for I:= 1 to N do
begin
readln(A);
if (2020 mod A =0) and (A<>2020) then S:= S+1;
end;
writeln(S);
end.

Чип, вживляемый в мозг всем при рождении. Он подключен непосредственно к нейронам, передает компу напрямую команды (без необходимости пользоваться мышкой и клавой) , и передает от компа в мозг видео и аудио сигналы без необходимости пользоваться монитором и наушниками. Кроме того, становится возможно передавать запахи, вкусы и ощущения. 

... очень скоро находится кучка хакеров, которые ломают эту систему, превращая всех людей на планете в зомби. Кучка хакеров захватывает мир. Потом главный хакер убивает всех других хакеров и становится правителем мира. И никто даже не рыпнется против него! :) Занавес.

Компьютер наконец-то приобретёт элементы интеллектуальности.
Общение с ним максимально будет приближено к человеческому языку.
Виртуальность приобретёт реальные черты, предметы станут ощутимыми, окружение станет объёмным и будет полностью соответствовать человеческим органам чувств.
Но никогда искусственный интеллект не превзойдёт человека.
Любая биологическая клетка неизмеримо более сложна, чем самый заумный компьютер.
Метод обработки информации у будущих компьютеров, как и в природе, станет аналоговым, а не как сейчас, цифровым.
В природе цифровых процессов не существует, а только аналоговые.