Укажите имена файлов, соответствующие маске: *?май*.р?*​

программа на паскале:

program xxx;

      var a, b: real;

begin

  writeln('введите количество миль');

  readln(a);

  b: = a*1.6;

  writeln('кол-во киллометров - ',b)

end.

количество базовых цветов обозначим за n. из всех базовых цветов будет складываться какой то один цвет, соответственно количество всевозможных цветов можно вычислить по формуле n=2^(2*n)

t1 = s1/v1

t2 = s2/v2

v(sr) = (s1+s2)/(t1+t2)

var i,s : longint; begin  s: =0;   for i: =100 to 999 do s: =s+i;   writeln(s); end.