Как расшифровать слово 1088-1105-1074 компьютерная кодировка

РЁВ
Для нахождения символа, соответствующего нужному коду, нужно использовать функцию chrunicode().

запись (record) — это пользовательский тип данных, котоорый может содержать поля с различными типами данных, например:

type

 schools = (1, 2, 3, 4, 5, 6, 7, 8, 9, 10)

 students = record

    name, surname : string;

    age : byte;

    school : schools;

 end;

Для обращения к полям записи из главной программы необходимо разделять имя переменной типа Запись и поля, которое оно содержит, символом "." (точка). Например:

var

 student : students;

begin

 student.name := 'Иван';

 student.surname := 'Пупкин';

end.

Если необходимо получить или изменить значения нескольких полей записи, то удобнее использовать конструкцию with:

begin

 with student do begin

    name := 'Вася';

    surname := 'Пупкин';

    age := 12;

    school := 5;

 end;

end.

Чтобы упростить программу, будем выводить команды типа "сделай ЕДИНИЦА", где ЕДИНИЦА и ДЕВЯТЬ - процедуры.

Описание процедуры:

процедура <имя процедуры>

нач        

<тело процедуры>

кон

процедура ЕДИНИЦА

нач

поворот шаг шаг шаг шаг

поворот поворот

прыжок прыжок прыжок прыжок

поворот

кон

процедура ДЕВЯТЬ

нач

шаг поворот шаг шаг шаг

шаг поворот шаг поворот шаг

шаг поворот шаг поворот поворот поворот

прыжок прыжок поворот

кон

тело программы: программа Число 1919

    нач

         сделай ЕДИНИЦА

         прыжок

         сделай ДЕВЯТЬ

         прыжок

         сделай ЕДИНИЦА

         прыжок

         сделай ДЕВЯТЬ

   кон

Подробнее - на -