Сообщений, в смысле словосочетаний может быть хоть сколько много, а вот различных слов может быть 8*8*8 (8 в 3 степени)
<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadlnString.Distinct.Count.Println
end.
<h2>abca</h2><h2>3</h2>
Реляционная БД - это БД, состоящая из взаимосвязанных таблиц.
Следовательно, наиболее подходящий аналог - двухмерная таблица, так как в реляционной БД также существуют поля (атрибуты) и записи, ровно как и в обычной таблице.
Pascal abc
<em><u>Проверка</u></em>
-29 13 -23 -20 10 13 -23 -1 30 45
кол-во полож=5<span>
</span>
Var
a, b, c, d: integer;
begin
write ('Введите три числа: ');
readln (a, b, c);
if a >= b then
d := a
else
d := b;
if c > d then
d := c;
writeln ('Максимальное из них: ', d);
readln
end.