Var i, c, n: integer;
begin
read(n);
c:=1;
for i:=1 to n do
c:=c*2;
writeln(c);
<span>end.</span>
Program z1;
Var k:integer;
Begin
Readln(k);
Writeln('1');
End.
Ответ:
1-1 2 - 7 3-1 4-4 6-6 7-8 8-3.
Объяснение:
Как то так)
Prt Sc клавиша.
Потом просто вставляешь картинку
Всего 3-буквенных слов, составленных из этих букв без ограничений на число букв А, 4^3 = 64 (на каждое из трёх мест претендуют 4 буквы, бувы можно выбирать независимо).
Из них не подходят (не содержат букв А) 3^3 = 27 (тут на каждое место по 3 буквы).
Тогда подходящих 64 - 27 = 37.