На месте первой буквы может стоять только 4 буквы, на второй тоже 4(М может быть только на 5м)
на 3,4,6,7х местах по 3(т.к. "М" на 5м, а "Х" на 1м или 2м), на 5м месте тоже 4.
4*4*3*3*4*3*3 = 5184
Var a,b,c,S,p:real;
begin
readln(a,b,c);
if (a<b) and (b<c) then writeln(a,b,c);
p:=0;
p:=a+b+c/2;
S:=0;
S:=sqrt(p*(p+a)*(p+b)*(p+c));
writeln(S:5:3);
end.
Если использовать однобайтную кодировку, то
150 * 40 * 60 / 1024 = 351,5625 КБ.
Код в прикрепленном файле, пример программы тоже (+2 скриншота листинга)
Массив заполняется рэндомными числами размерность массива задается в начале метода Main
В примере она
int n = 10;
int m = 10; их можно заменять на свои