PL/1

История

Язык ПЛ/1 родился в недрах фирмы IBM и был(есть), как и все изделия этой фирмы, большим и надежным. Вероятно, люди старше 25 лет, работавшие когда-то с mainframe помнят его.

Сегодняшний день

На сегодняшний день, когда популярными стали ЭВМ класса PC, довольно трудным делом оказалось найти компилятор ПЛ/1. По моим данным их существует 3 (ТРИ) вида:

Так же можно найти версии под разные UNIXы.

... Но!!!

сложно найти, сколько нибудь, полную информацию о программировании на ПЛ/1. В свое время был замечательный учебник по программированию на ПЛ/1, известный студентам как "Фролов-Олюнин" (это авторы или редакторы?)

ИТАК

Я считаю, что этот язык забыт незаслуженно. Зачем изобретать велосипед снова и снова? Ведь даже того, что есть уже в ПЛ/1. а как вам обратимые функции ПЛ/1? Ведь в нем имеет смысл запись вида

substr(string,1,3)="abc"
и результат ее, отнють, не логический!!! Программа на ПЛ/1 выглядит следующим образом:

 
/*Заголовок программы*/
Primer: procedure options(main);
/*Описание переменных*/
 declare   x fixed, y char(1);
/*Тело программы*/
     put list('Работает программа PRIMER');
     get list(y);
     x=y; 
     x=x*2+5;
     put skip list('Cleave=',x);
end Primer;