История изменений
Исправление vM, (текущая версия) :
какой там «нормальный» Паскаль был на мейнфреймах?
Был и есть. В котором такая программка работает, если заменить ^ на @ или то, что для компилятора означает изначальный паскалевский ↑.
program o(source,listing);
var source, listing:text;
begin
reset(source);
rewrite(listing);
while not eof(source) do
begin writeln (listing, source^,'(', ord(source^), ')'); get(source) end;
end.
как там было с графикой на мейнфреймах?
В 1960-х было так, как было с платёжеспособностью у заказчика.
Исходная версия vM, :
какой там «нормальный» Паскаль был на мейнфреймах?
Был и есть. В котором такая программка работает, если заменить ^ на @ или то, что для компилятора означает изначальный паскалевский ↑.
program o(source,listing);
var source, listing:text;
begin
reset(source);
rewrite(listing);
while not eof(source) do
begin writeln (listing, source^,'(', ord(source^), ')'); get(source) end;
end.