Решить:

дано трехзначное натуральное число, требуется вычислить сумму его цифр.

ответ:

я уже писал такие

program s9;

var h,s,d,g,e,j,l,n,z,f: integer;

begin

writeln('введите любое трехзначное число');

read (h);

d: =h div 100;

g: =h mod 10;

e: =h div 10;

j: =e mod 10;

s: =g*100;

l: =j*10;

n: =s+l+d;

f: =d+g+j;

writeln('инверсия данного числа будет=',n);

if (n> h) then z: =n-h;

if (n

writeln('разница между числом и его инверсией будет=',z);

writeln('сумма всех цифр из данного числа будет = ',f);

end.

объяснение:

германия

испания

португалия

франция

чехия

2^i = 64

i = 6 бит приходится на 1 символ

3 * 40 * 60 * 6 = 43200 бит

43200 : 8 = 5400 байт