Дан массив символов, образующий несколько слов. Вывести на экран слово с максимальным количеством гласных букв. Основной код я сделал и он правильный, осталось только найти максимальное кол-во гласных букв в слове и вывести это слово
код:
program lab_14;
const n=30; {максимальная размерность массива}
var a: array[1..n] of char; {объявление одномерного символьного массива}
kol: integer; {переменная для нахождения количества введенных слов}
k: integer; {вс переменная для хранения количества введенных
символов}
i: integer; {счетчик цикла}
begin
{Ввод с клавиатуры длины исходной строки}
writeln('Укажите суммарную длину вводимой строки, включая пробелы. Строка
не должна превышать', n , 'символов.');
k:=0;
repeat {Вводим ограничение на вводимое значение k}
readln(k)
until (k>1) and (k<30);
writeln('Введите строку и в конце нажмите клавишу Enter. Максимальная длина
введенной строки', k , 'символов, включая пробелы.');
{Ввод исходной строки}
for i:=1 to k do
read(a[i]);
{Первоначально предполагаем, что пользователь не ввел ни одного слова}
kol:=0;
{Вывод на экран введенной строки}
writeln('Исходная строка:');
for i:=1 to k do
write(a[i]);
writeln;

Команда выборки с параметром сортировки

Очень часто записи в таблицах бывают упорядочены по какому-то правилу. Например,

- в телефонных справочниках — в алфавитном порядке фамилий абонентов; 
- в расписании движения поездов — в порядке времени отправления; 
- в таблице футбольного чемпионата — по возрастанию номеров мест, которые занимают команды.

Процесс упорядочения записей в таблице называется сортировкой.

Для выполнения сортировки должна быть указана следующая информация:

а) по значению какого поля производить сортировку; 
б) в каком порядке сортировать записи (по возрастанию или убыванию значений поля).

В команду выборки можно добавить параметры сортировки, в соответствии с которыми будут упорядочены строки в итоговой таблице. В таком случае формат команды выборки становится следующим:

.выбрать ‹список выводимых полей› 
где ‹условия выбора› 
сортировать ‹ключ сортировки› 
по ‹порядок сортировки› 

Ключ сортировки

Ключом сортировки называется поле, по значению которого производится сортировка.

Возможны два варианта порядка сортировки: по возрастанию значений ключа и по убыванию значений ключа.

Отсортируем записи таблицы «Погода» по убыванию значений влажности. Для этого нужно отдать команду:

.выбрать все сортировать ВЛАЖНОСТЬ по убыванию

В результате выполнения этой команды будет получена таблица 3.6.

Таблица 3.6. Таблица «Погода», отсортированная по убыванию влажности

Допустим цифра AB
A+B=3k k=1,2,3... кратность к 3
A=3B условие 2-ое

получаем 3B+B=3k
4B=3k отсюда вывод вторая цифра кратная к 3,
то есть 3,6,9

При B=6 и B=9 => цифра A получится двухзначним
значит B=3, A=9

ответ 93

int x=0;
for(int i=1;i<10;i++)
  for(int j=1;j<10;j++)
     if(i%3==0 && i==3*j)
        {x=i*10+j;
         cout<<x<<endl;
         }

можно оптимизировать

for(int i=1;i<4;i=i++)
 if(i%3==0)
  {x=i*31;
         cout<<x<<endl;
         }

1й перебирает 99 вариантов
2й 3 варианта

Или просто можно сделать
cout<<"93"<<endl;

)))