// PascalABC.NET 3.3, сборка 1542 от 05.10.2017 // Внимание! Если программа не работает, обновите версию!
begin var c1:=ReadlnChar('Введите первый символ:'); var c2:=ReadlnChar('Введите второй символ:'); Print(c1); if c1>c2 then Print('>') else if c1=c2 then Print('=') else print('<'); Println(c2) end.
Примеры Введите первый символ: a Введите второй символ: b a < b
Введите первый символ: d Введите второй символ: d d = d
Введите первый символ: z Введите второй символ: m z > m
Введите первый символ: q Введите второй символ: Q q > Q
Метод таблично-волнового (Wave-Table) синтеза лучше соответствует современному уровню развития техники. Если говорить упрощенно, то можно сказать, что где-то в заранее подготовленных таблицах хранятся образцы звуков для множества различных музыкальных инструментов (хотя не только для них). В технике такие образцы называют сэмплами. Числовые коды выражают тип инструмента, номер его модели, высоту тона, продолжительность и интенсивность звука, динамику его изменения, некоторые параметры среды, в которой происходит звучание, а также прочие параметры, характеризующие особенности звука. Поскольку в качестве образцов используются «реальные» звуки, то качество звука, полученного в результате синтеза, получается очень высоким и приближается к качеству звучания реальных музыкальных инструментов.
// Внимание! Если программа не работает, обновите версию!
begin
var c1:=ReadlnChar('Введите первый символ:');
var c2:=ReadlnChar('Введите второй символ:');
Print(c1);
if c1>c2 then Print('>')
else
if c1=c2 then Print('=')
else print('<');
Println(c2)
end.
Примеры
Введите первый символ: a
Введите второй символ: b
a < b
Введите первый символ: d
Введите второй символ: d
d = d
Введите первый символ: z
Введите второй символ: m
z > m
Введите первый символ: q
Введите второй символ: Q
q > Q