#include<iostream>
#include<cmath>
using namespace std;
int main()
{
int a, j = 0;
cin >> a;
int k = a;
while(k>0) {
j += k % 10;
k /= 10;
}
if (pow(j,3) == pow(a, 2))
cout << "Куб суммы цифр этого числа равен А*А." << endl;
else
cout << "Куб суммы цифр этого числа не равен А*А." << endl;
}
A)кузнец,столяр,швея,шахтёр.b)таксист,слесарь,ткачиха
Var x,s:integer;
begin
s := 0;
read(x);
while x <> 0 do
begin
if (x mod 3 = 0) and (x mod 10 = 4)
then s := s + x;
read(x)
end;
write(s)
end.
16 символов - это 2^4 4 бит символ
256 символов - это 2^8 8 бит символ
4*20=80 бит - объем информации при наборе 16 символьным алфавитом
8*20=160 бит - объем информации при наборе 256 симв. алфавитом.
Тем самый в два раза меньше объем у 16 символьного алфавита
Если имеется в виду написать алгоритмом, то вот код на Pascal:
var x: integer;
x := sqrt(9 - 2 * sqrt(20)) - sqrt(9 + 2 * sqrt(20));