Дан массив в(20) , заменить в нем все отрицательные числа на 1, а положительные на 2.

Var  b: array[1..20] of integer;   i: integer; begin     //тут пишите свой массив  b[1]: =-5;   b[2]: =0;   b[3]: =10;   i: =1;     for i : = 1 to 20 do      begin       if b[i]< 0 then          b[i] : = 1      else b[i] : = 2;         writeln(b[i]);       end; end.

Первое поколение – вычислительные машины на электронных лампах (1945-1955 гг.). Первой действующей ЭВМ 1-го поколения стал ENIAC (США, 1945 - 1946 гг.). Его название по первым буквам соответствующих английских слов означает «электронно-числовой интегратор и вычислитель».

ЭВМ 2-го поколения были разработаны в 1955—1965 гг. В качестве основного элемента были использованы уже не электронные лампы, а полупроводниковые диоды и транзисторы, а в качестве устройств памяти стали применяться магнитные сердечники и магнитные барабаны - далекие предки современных жестких дисков.

Примеры машин третьего поколения — семейства IBM—360, IBM—370, ЕС ЭВМ (Единая система ЭВМ), СМ ЭВМ (Семейство малых ЭВМ) и др. Быстродействие машин внутри семейства изменяется от нескольких десятков тысяч до миллионов операций в секунду. Ёмкость оперативной памяти достигает нескольких сотен тысяч слов.

Четвертое поколение ЭВМ: После 1975 года. Элементная база ЭВМ – большие и сверхбольшие интегральные схемы (БИС, СБИС), где в одном кристалле размещалось несколько десятков тысяч электрических элементов. Начиная с 1980 года практически все ЭВМ стали создаваться на основе микропроцессоров.