Отдельным постом ИБО !

1964 - снимем шляпы господа программисты. В этот день IBM объявила о начале разработки великой и ужасной System 360. Кому еще нет сорока сообщу - для нашего поколения это тоже самое, что для вашего создание IBM PC. По сути - массовая мировая компьютеризация началась именно с System 360 и еще с PDP-11. Уже на следующий год в США возникнет термин "персональный компьютер".



Вот она, родненькая ! На фото все, кроме перфораторов и барабанных принтеров.



А это обложка самой главной книжки советского прогрммиста начала-середины 80х. Кстати, читалась как увлекательный приключенческий роман. Взапой.

Пример программы на языке PL/I, главном языке этой системы

/* Read in a line, which contains a string,
/* and then print every subsequent line that contains that string. */

find_strings: procedure options (main);
declare pattern character (100) varying;
declare line character (100) varying;
declare (line_no, end_file) fixed binary;

end_file = 0;
on endfile (sysin) end_file = 1;

get edit (pattern) (L);
line_no = 1;
do while (end_file = 0);
if index(line, pattern) > 0 then
put skip list (line_no, line);
line_no = line_no + 1;
get edit (line) (L);
end;

end find_strings;