По условию, буква А встречается в слове ровно 1 раз. Вася составляет 5-буквенные слова, следовательно буква А может стоять на одном из 5 мест.Таким образом, на все остальные буквы (Б, В и Г) приходится 4 свободных места.:
_ _ _ _ _
A _ _ _ _
_ A _ _ _
_ _ A _ _
_ _ _ A _
_ _ _ _ A
Число возможных 4-буквенных слов, в которых есть только 3 буквы Б, В, Г, равно 34=81.
Умножаем полученные 81 вариантов на 5 возможных вариантов с буквой А и получаем правильный ответ.
81×5=405
Program p1;
var sum,i,m:integer;
begin
writeln('Введите m: ');
readln(m);
sum:=0;
while i<m do
begin
i:=i+1;
sum:=sum+i;
end;
writeln('Сумма натуральных чисел =',sum);
end.<span>
</span>
В)наверно
кассир и сам справится
а дворник зачем?
Var
N,A:integer;
B:longint;
k:boolean;
Begin
Write('N = ');
ReadLn(N);
For N:= 1 to N do
Begin
k:=true;
A:=N;
B:=A*A;
While A<>0 do
Begin
if (A mod 10 <> B mod 10) then k:=false;
A:= A div 10;
B:= B div 10;
End;
if k then Write(N,' ');
End;
End.