#39;Введіть будь-який символ: ');
ReadLn (ch); {Читаємо один символ}
WriteLn (ch, '=', Ord (ch)); {Перетворимо його до цілого і виводимо на екран}
END. p> Звертаємо увагу: при виклику
WriteLntch, ' = ', Ord (ch));
третім параметром звернення зазначений виклик функції ORD (СН), що з точки зору мови є вираженням; в багатьох випадках при виклику процедур і функцій в якості параметрів виклику можна вказувати не тільки змінні або константи, але й виразу з їх участю. p> 2.
Давайте подивимося, як можна реалізувати на універсальній мові програмування найпростіші інструкції лінгвіста (навіть не используюшую цих понять), що стосуються етапу перетворення орфографічного тексту в фонетичну транскрипцію. Далі наведено приклад задачі та її рішення на мові Паскаль.
Невимовні голосні:
Сполучення "Вств" і "СТН" транскрибуються як [ств] і [сн] відповідно, тобто:
1)/Вств/-> [ств]
2)/СТН/-> [ЛНЦ]
Реалізація двох даних правил на мові Паскаль:
program transcription;
var
Word: String;
I, J, K: Integer;
begin
Write ('Введіть слово:'); ReadLn (Word);
K: = Pos ('вств', word);
while (K 0) do
begin
delete (Word, K, 1);
K: = Pos ('вств', Word);
end;
K: = Pos ('СТН', Word);
while (K 0) do
begin
delete (Word, K +1, 1);
K: = Pos ('СТН', Word);
end;
WriteLn ('Транскрипція:', Word);
end.
Як видно з прикладу, два правила, викладені в лінгвістичному описі, реалізуються програмою в двадцять з гаком рядків. Неважко помітити, що а) такий запис дуже громіздка, б) вона важка для сприйняття, в) вона абсолютно не має нічого спільного з записом, природною для лінгвіста і тому погано відображає суть перетворень. А якби ми трохи ускладнили правила, ввівши декілька слів-винятків, вимагаючи перевірити, чи не є транскрібіруемих слово похідним від одного з них, програма збільшилася б у два рази або більше. h2> Список літератури
Для підготовки даної роботи були використані матеріали з сайту <2balla.ru br>