Дизель-Паскаль

Языки программирования, процессоры, операционные системы, в которых русский язык занимает достойную роль в процессе разработки.
Ответить
БудДен
Сообщения: 2828
Зарегистрирован: 07.10.18 14:01

Дизель-Паскаль

Сообщение БудДен » 03.07.22 18:03

Реализация языка Паскаль и среды разработки к нему. Поддерживает русскоязычные ключевые слова. Пример кода:

Код: Выделить всё

модуль Main; 

интерфейс 
  тип TMainForm = класс(TForm) 
    Button1: ТКнопка; 
    Button2: ТКнопка; 
    Button3: TButton; 
    Button4: TButton; 
    ListBox1: TListBox; 
 
    процедура Button4Click(Отправитель: ТОбъект); 
  защищенные 
  закрытые 
  открытые 
    Кнопка1: ТКнопка; 
    Кнопка2: ТКнопка; 

    конструктор Создать(аВладелец: ТКомпонент); 
  конец; 

перем MainForm: TMainForm; 

реализация 

процедура TMainForm.Button4Click(Отправитель: ТОбъект); 
перем Ц: Целое; 
Стр: строка; 
начало 
  для Ц := 1 до 10 выполнять 
    начало 
    Стр := 'Запись ' + ЦелоеВСтроку(Ц); 
    ListBox1.Элементы.Добавить(Стр); 
  конец; 
конец; 

конструктор TMainForm.Создать(аВладелец: ТКомпонент); 
начало 
  родительский Создать(аВладелец); 
  Кнопка1 := Button1; 
  Кнопка2 := Button2; 
конец; 
конец. 
http://visual-t.ru

Ответить