<span>(50-20)х(30-10)=30х20</span>
если не сосем тю-тю то должны понять)
12022, 1222, 989, 90899, 9000
2048*1536=>3 145 728*3=>9 437 184 byte=>9 437,184 Kb=>9,437184 Mb
Begin
var s:=readlnstring;
var gl:='АЕИОУЫЯЁЮЭ';
var m:=s.ToWords;
var k:=m.Length;
var b:=new integer[k];
for var i:=0 to k-1 do
b[i]:=m[i].Where(c->c.ToUpper in gl).Count;
Writeln(m[b.IndexMax])
end.