imported>DenisKrivosheev в 17:36, 31 декабря 2025

2025-12-31T17:36:06Z

Новая страница

{{Язык программирования
| название = Simula
| логотип = Simula - logo.svg
| семантика =
| класс = [[Мультипарадигменное программирование|Мультипарадигменный]]: [[Процедурное программирование|процедурный]], [[Императивное программирование|императивный]], [[Структурное программирование|структурный]], [[Объектно-ориентированное программирование|объектно-ориентированный]]
| тип =
| дата выпуска = {{Start date and age|1962}}
| автор = [[Даль, Оле-Йохан|Оле-Йохан Даль]]
| разработчик = [[Нюгор, Кристен|Кристен Нюгор]]
| расширение =
| последняя версия = Simula 67, Simula I
| дата выпуска последней версии =
| последняя тестовая версия =
| дата выпуска последней тестовой версии =
| система типов = [[Статическая типизация|Статическая]], [[Номинальная типизация|номинальная]]
| реализации =
| диалекты =
| испытал влияние = [[Алгол|Алгол 60]], [[SIMSCRIPT]]
| повлиял на = [[BETA]], [[Клу]], [[Eiffel]], [[Emerald (язык программирования)|Emerald]], [[Паскаль (язык программирования)|Паскаль]], [[Smalltalk]], [[C++]], и многие другие [[Объектно-ориентированный язык программирования|объектно-ориентированные языки программирования]]
| лицензия =
| платформа =
| операционная система = [[Unix-подобная операционная система|Unix-подобные]], [[Windows]], [[z/OS]], [[TOPS-10]], [[MVS]]
| сайт = {{URL|www.simula67.info}}
}}
'''Си́мула-67''' (''Simula 67'') — [[язык программирования]] общего назначения, разработанный в конце 1960-х годов сотрудниками [[Норвежский вычислительный центр|Норвежского вычислительного центра]] ([[Осло]]) [[Нюгор, Кристен|Кристеном Нюгором]] и [[Даль, Оле-Йохан|Оле-Йоханом Далем]] для [[Моделирование|моделирования]] [[Сложная система|сложных систем]].

Симула традиционно не считается [[Объектно-ориентированное программирование|объектно-ориентированным]] языком в каноническом смысле этого слова, в частности, создатель языка [[Smalltalk]] [[Кэй, Алан Кёртис|Алан Кэй]] имел в виду под этим термином семантику акторов, впервые реализованную в языке [[Плэнер]] Карла Хьюитта, а не расширение алголоподобных языков «объектной» нотацией<ref name="alankay">{{cite web|url=http://c2.com/cgi/wiki?AlanKaysDefinitionOfObjectOriented|title=Alan Kay's Definition Of Object Oriented Programming|lang=en|archive-url=https://web.archive.org/web/20180126150020/http://wiki.c2.com/?AlanKaysDefinitionOfObjectOriented|archive-date=2018-01-26|access-date=2024-07-17|url-status=live}} ''«I invented the term object-oriented, and I can tell you that C++ wasn’t what I had in mind»''</ref>.

Стал первым языком со встроенной поддержкой основных синтаксических соглашений, принятых в современных языках объектно-ориентированного программирования. Считается, что язык в значительной степени опередил время, и программисты 1960-х годов оказались не готовы воспринять ценности языка, в связи с чем он не выдержал конкуренции с другими языками программирования. Прохладному отношению к языку способствовало и то обстоятельство, что его реализация была весьма неэффективна, не в последнюю очередь из-за использования [[сборка мусора (программирование)|сборки мусора]].

Тем не менее, этот язык активно использовался в образовательном процессе в высших учебных заведениях, особенно в Скандинавии; о влиянии Симулы на разработку им [[C++]] отмечал его автор — [[Страуструп, Бьёрн|Страуструп]] (в том числе в книге «[[Дизайн и эволюция C++]]»).

В современной терминологии язык можно охарактеризовать как объектное расширение [[Алгол]]а 60. Конструкции языка очень сходны с аналогичными в современных объектно-ориентированных языках.

== Примеры ==

=== Минимальная программа ===
'''Begin'''
'''End''';

=== Hello, World ===
Программа «[[Hello, World]]»:
'''Begin'''
'''OutText''' ("Hello, World!");
'''Outimage''';
'''End''';

=== Классы, подклассы и виртуальные процедуры ===
'''Begin'''
'''Class''' Glyph;
'''Virtual''': '''Procedure''' print '''Is''' '''Procedure''' print;;
'''Begin'''
'''End''';

Glyph '''Class''' Char (c);
'''Character''' c;
'''Begin'''
'''Procedure''' print;
OutChar(c);
'''End''';

Glyph '''Class''' Line (elements);
'''Ref''' (Glyph) '''Array''' elements;
'''Begin'''
'''Procedure''' print;
'''Begin'''
'''Integer''' i;
'''For''' i:= 1 '''Step''' 1 '''Until''' UpperBound (elements, 1) '''Do'''
elements (i).print;
OutImage;
'''End''';
'''End''';

'''Ref''' (Glyph) rg;
'''Ref''' (Glyph) '''Array''' rgs (1 : 4);

''! Main program;''
rgs (1):- '''New''' Char ('A');
rgs (2):- '''New''' Char ('b');
rgs (3):- '''New''' Char ('b');
rgs (4):- '''New''' Char ('a');
rg:- '''New''' Line (rgs);
rg.print;
'''End''';

===[[Стратегия вычисления#Вызов по имени|Вызов по имени]]===
'''Real''' '''Procedure''' Sigma (k, m, n, u);
'''Name''' k, u;
'''Integer''' k, m, n; '''Real''' u;
'''Begin'''
'''Real''' s;
k:= m;
'''While''' k <= n '''Do''' '''Begin''' s:= s + u; k:= k + 1; '''End''';
Sigma:= s;
'''End''';

=== Симуляция ===
Simulation '''Begin'''
'''Class''' FittingRoom; '''Begin'''
'''Ref''' (Head) door;
'''Boolean''' inUse;
'''Procedure''' request; '''Begin'''
'''If''' inUse '''Then''' '''Begin'''
Wait (door);
door.First.Out;
'''End''';
inUse:= '''True''';
'''End''';
'''Procedure''' leave; '''Begin'''
inUse:= '''False''';
'''Activate''' door.First;
'''End''';
door:- '''New''' Head;
'''End''';

'''Procedure''' report (message); '''Text''' message; '''Begin'''
OutFix (Time, 2, 0); OutText (": " & message); OutImage;
'''End''';

Process '''Class''' Person (pname); '''Text''' pname; '''Begin'''
'''While''' '''True''' '''Do''' '''Begin'''
Hold (Normal (12, 4, u));
report (pname & " is requesting the fitting room");
fittingroom1.request;
report (pname & " has entered the fitting room");
Hold (Normal (3, 1, u));
fittingroom1.leave;
report (pname & " has left the fitting room");
'''End''';
'''End''';

'''Integer''' u;
'''Ref''' (FittingRoom) fittingRoom1;

fittingRoom1:- '''New''' FittingRoom;
'''Activate''' '''New''' Person ("Sam");
'''Activate''' '''New''' Person ("Sally");
'''Activate''' '''New''' Person ("Andy");
Hold (100);
'''End''';

== Примечания ==
{{примечания}}

== Ссылки ==
* [http://heim.ifi.uio.no/~kristen/FORSKNINGSDOK_MAPPE/F_OO_start.html heim.ifi.uio.no/~kristen/FORSKNINGSDOK_MAPPE/F_OO_start.html] — Страничка Кристена Нюгора ([http://web.archive.org/web/20100105085104/http://heim.ifi.uio.no/~kristen/FORSKNINGSDOK_MAPPE/F_OO_start.html Архив]{{ref|en}}).
* [http://www.iro.umontreal.ca/~simula/ www.iro.umontreal.ca/~simula] — раздел посвящённый Симуле-67 на сайте [[Монреальский университет|Монреальского университета]].
* [http://staff.um.edu.mt/jskl1/talk.html staff.um.edu.mt/jskl1/talk.html] — Introduction To OOP In Simula
* [http://www.volny.cz/petr-novak/cim/ www.volny.cz/petr-novak/cim] — Cim 3.33 for MS Windows — компилятор Симулы c [[GPL]] лицензией.

{{Объектно-ориентированные языки}}

[[Категория:Объектно-ориентированные языки программирования]]
[[Категория:Свободные компиляторы и интерпретаторы]]
[[Категория:Языки программирования семейства Алгола]]

Симула - История изменений

imported>DenisKrivosheev в 17:36, 31 декабря 2025