Program gt;
var a,b,p:real;
i:integer;
begin
a:=10000;
p:=7.4;
for i:=1 to 8 do
begin
a:=a+a*p/100;
end;
writeln(a);
<span>end.</span>
Наверное, так:) Сумма уоличества всех возможных имён длиной от 1 до 5 символов, но, право, циклом короче было бы ._.
Светлый,яркий,огромный,тусклый,широкий,близкий
Ответом является число 1, ведь самое маленькое кол-во человек это 1