Программа на языке pascal: в текстовом файле найти строку, содержащую слово с наибольшим числом гласных букв. вычислить произведение чисел в этой строке. (строк несколько) например: (12 строка): aba cda 34 решение: (№строки) (слово с наиб.кол-вом гласн.) (произведение чисел в строке) буду признателен

//pascal //файл filetext.txt должен быть в папке с программой const   vowels = ['e', 'u', 'i', 'o', 'a', 'y', 'e', 'u', 'i', 'o', 'a', 'y']; var   t: text;   s: char;   n, min, mult, mult2, count, count2: integer; begin   assign(t, ' filetext.txt');   reset(t);   n : = 0; min : = 0; mult : = 1; count : = 0;   while not eof(t) do   begin       count : = count + 1;       while not eoln(t) do       begin           read(t, s);           if s in vowels then               inc(n);           if s in ['0' .. '9'] then               mult : = mult * (ord(s) - 48);       end;       if n > min then       begin           min : = n;           mult2 : = mult;           mult : = 1;           count2 : = count;       end;       readln(t);       n : = 0;       mult : = 1;   end;   close(t);   write(count2, ' строка. ');   write('произведение = ', mult2, '. ');   writeln('гласных = ', min);   readln; end.

Компью́терная анима́ция — вид мультипликации, создаваемый при компьютера. В отличие от более общего понятия «графика CGI», относящегося как к неподвижным, так и к движущимся изображениям, компьютерная анимация подразумевает только движущиеся.

Анимация — это визуальное отображение изменений свойств одного объекта (например, такого как слой) или набора объектов (например, нескольких слоёв).