Program Djonny1981; uses crt; const m=5; var a: array[1..m,1..m] of integer; i, j: integer; sum: integer; begin randomize; sum:=0; for i:=1 to m do begin for j:=1 to m do begin a[i,j]:=random(101)-50; write(a[i,j]:5); end; writeln(); end; for i:=1 to m do for j:=1 to m do if j mod 2 = 0 then {вот здесь проверка, чётный ли столбец} sum := sum + a[i,j]; writeln('Сумма элементов чётных столбцов равна ',sum); if sum>0 then for i:=1 to m do for j:=1 to m do if i mod 2 = 1 then a[i,j]:=a[i,j]*a[i,j] else for i:=1 to m do a[m-i+1,i]:=a[m-i+1,i]+2; for i:=1 to m do begin for j:=1 to m do write(a[i,j]:5); writeln(); end; end.
1-ое поколение: 1946 г. создание машины ЭНИАК на электронных лампах. Эти ЭВМ были громоздкими сооружениями и занимали большую территорию. Для ввода программ и данных применялись перфоленты и перфокарты. Не было монитора, клавиатуры и мышки. Использовались эти машины для инженерных и научных расчетов.
2-ое поколение: 60-е годы. ЭВМ построены на транзисторах. Машины стали компактнее, надежнее, менее энергоемкими. Возросло быстродействие и объем внутренней памяти. Большое развитие получили устройства внешней (магнитной) памяти: магнитные барабаны, накопители на магнитных лентах(кассеты). стали развиваться языки программирования высокого уровня: ФОРТРАН, АЛГОЛ, КОБОЛ. были изобретены интегральные схемы.
3-е поколение: 70-е годы. ЭВМ построены на интегральных микросхемах (ИС). В Советском Союзе в 70-х годах начался выпуск машин серии ЕС ЭВМ (Единая система ЭВМ) по образцу IBM 360/370. Скорость работы достигла уже нескольких миллионов операций в секунду. На машинах третьего поколения появился новый тип внешних запоминающих устройств – магнитные диски. Созданы большие интегральные схемы (БИС).
4-ое поколение: Начало создаваться с 1971 г. с изобретением микропроцессора (МП). Создано на основе больших интегральных схем (БИС). Наиболее яркие представители четвертого поколения ЭВМ - персональные компьютеры (ПК). Персональной называется универсальная однопользовательская микроЭВМ. Связь с пользователем осуществлялась посредством цветного графического дисплея с использованием языков высокого уровня.
Program Djonny1981;
uses crt;
const
m=5;
var
a: array[1..m,1..m] of integer;
i, j: integer;
sum: integer;
begin
randomize;
sum:=0;
for i:=1 to m do
begin
for j:=1 to m do
begin
a[i,j]:=random(101)-50;
write(a[i,j]:5);
end;
writeln();
end;
for i:=1 to m do
for j:=1 to m do
if j mod 2 = 0 then {вот здесь проверка, чётный ли столбец}
sum := sum + a[i,j];
writeln('Сумма элементов чётных столбцов равна ',sum);
if sum>0 then
for i:=1 to m do
for j:=1 to m do
if i mod 2 = 1 then
a[i,j]:=a[i,j]*a[i,j]
else
for i:=1 to m do
a[m-i+1,i]:=a[m-i+1,i]+2;
for i:=1 to m do
begin
for j:=1 to m do
write(a[i,j]:5);
writeln();
end;
end.
2-ое поколение: 60-е годы. ЭВМ построены на транзисторах.
Машины стали компактнее, надежнее, менее энергоемкими. Возросло быстродействие и объем внутренней памяти. Большое развитие получили устройства внешней (магнитной) памяти: магнитные барабаны, накопители на магнитных лентах(кассеты). стали развиваться языки программирования высокого уровня: ФОРТРАН, АЛГОЛ, КОБОЛ. были изобретены интегральные схемы.
3-е поколение: 70-е годы. ЭВМ построены на интегральных микросхемах (ИС).
В Советском Союзе в 70-х годах начался выпуск машин серии ЕС ЭВМ (Единая система ЭВМ) по образцу IBM 360/370. Скорость работы достигла уже нескольких миллионов операций в секунду. На машинах третьего поколения появился новый тип внешних запоминающих устройств – магнитные диски. Созданы большие интегральные схемы (БИС).
4-ое поколение: Начало создаваться с 1971 г. с изобретением микропроцессора (МП).
Создано на основе больших интегральных схем (БИС). Наиболее яркие представители четвертого поколения ЭВМ - персональные компьютеры (ПК). Персональной называется универсальная однопользовательская микроЭВМ. Связь с пользователем осуществлялась посредством цветного графического дисплея с использованием языков высокого уровня.