33(k)+22(k)+16(k)+17(k)=100(k)
Перейдем к десятичной системе счисления.
(3k+3)+(2k+2)+(k+6)+(k+7)=k²
k²-7k-18=0
D=49+72=121; √D=11
k₁=(7-11)/2=-2 < 0 - не удвлетворяет
k₂=(7+11)/2=9
Следовательно, <em><u>система счисления девятеричная.</u></em>
Программно-аппаратный комплекс, обеспечивающий автоматизированный обмен данными между компьютерами называется компьютерная сеть
#include<cmath>
#include<iostream>
using namespace std;
int main()
{
int N;
double P = 1;
cout << "N = ", cin >> N;
for(int A = 1; A<=N; A++)
P=P*A;
P = (N>0?pow(P,(double)1/N):0);
cout << "P = "<<P<<"\n";
system("Pause");
return 0;
}
Uses crt;
Var p1,p2,p22,k,p3,i: integer;
b:array [1..6] of integer;
Begin
Writeln('введите трехзначное целое число -');
Readln(k);
p1:=k div 100;
p22:=k mod 100;
p2:=p22 div 10;
p3:=p22 mod 10;
writeln('p1= ',p1,'p2= ',p2,'p3= ',p3);
b[1]:=p1+p2*10+p3*100;
b[2]:=p1+p3*10+p2*100;
b[3]:=p2+p1*10+p3*100;
b[4]:=p2+p3*10+p1*100;
b[5]:=p3+p2*10+p1*100;
b[6]:=p3+p1*10+p2*100;
for i:=1 to 6 do
writeln('b[',i,']= ',b);
end.