var
n: integer;
begin
readln(n);
if(n mod 3 = 0) or (n = 1) then writeln('Является степенью тройки')
else writeln('Не является');
end.
Пушки - старинное артиллерийское оружие, стрляет ядрами - круглыми шарами, пристань - место у берега водоема, куда причаливают плав средства., палят - т.е стреляют, корабль - плавсредство, пристать - причалить, приблизиться, велят - приглашают, приказывают.
program fantscrin;
var a,c: array [1..1000] of integer;
i,n,s,j:integer;
Begin
write('N = '); readln(n);
s:=0;
for i:=1 to n do
begin
write('c[',i,'] = '); readln(c[i]);
s:=s+c[i];
end;
writeln('S = ', s);
j:=0;
for i:=1 to n do
if c[i] > s / n then
begin
j:= j + 1;
a[j]:= c[i];
end;
for i:=1 to j do
write(a[i], ' ')
End.
231
110111101
435
1605
110101001010
А7
7) ?
5F, 153, 128
В С++ ввод значения переменной реализуется с помощью оператора cin, то есть cin >> a;