Язык программирования, родственный языкам Паскаль и Оберон, использующий русские служебные слова - Глагол. Официальный сайт: http://glagol.nad.ru
Хотя возможностей у языка не много, недостающие функции можно осуществить при помощи ассемблера NASM. Прекрасно подходит для обучения, так как не требуется запоминать непонятные комбинации латинских букв, используются только русские служебные слова. В архиве с ним прилагается комплект различных исходников (игры (консольные - тетрис, шашки и крестики-нолики), простые примеры вывода текста, работы с файлами и др., вычисления и прочее). Понятная, хорошо оформленная документация. Вот пример простенького приложения: (******************************************************************************) (**) ОТДЕЛ ЧислоПи+; (**) (******************************************************************************) (* НАЗНАЧЕНИЕ: приближенное вычисление числа "Пи" *) (* АЛГОРИТМ: *) (* Пи/4 = 1 - 1/3 + 1/5 - 1/7 + ... (медленная сходимость) *) (******************************************************************************) ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Матем ИЗ "...\Отделы\Числа\"; ПОСТ ТОЧНОСТЬ=1.E-6; (* приблизительно *) (******************************************************************************) ЗАДАЧА Голова; (* Расчет по алгоритму и вывод ответа на экран *) ПЕР сумма,слагаемое:ВЕЩ; знаменатель,знак:ЦЕЛ; УКАЗ Вывод.Цепь("^Расчет суммы: 1 - 1/3 + 1/5 - 1/7 + ... "); сумма:=0; знаменатель:=1; знак:=1; ПОВТОРЯТЬ слагаемое:=знак/знаменатель; сумма:=сумма+слагаемое; УВЕЛИЧИТЬ(знаменатель,2); знак:=-знак ДО МОДУЛЬ(слагаемое) < ТОЧНОСТЬ; Вывод.ЧВещ("(%d слагаемых)^^ %g сумма*4^ %g ПИ^ %g arctg(1)*4^", знаменатель/2, сумма*4,Матем.ПИ,Матем.arctg(1)*4) КОН Голова; УКАЗ Голова КОН ЧислоПи. Так что качайте, учите и обсуждайте. Если вы хотите помочь издателю в развитии этого проекта, обращайтесь на официальный сайт на страничку обсуждения либо на его e-mail: [email protected]