Var a,e,z,y,x:integer;
Begin
Writeln('Введите трехзначное число');
Readln(a);
x:=a div 100;
y:=(a-x*100) div 10;
z:=a-y*10-x*100;
e:=x+y+z;
writeln('Сумма чисел ',x,' ',y,' и ',z,' равна ',e,'.');
<span>end.
p.s.
</span>a-трехзначное число
e-сумма чисел
x, <span>y </span>и <span>z </span>- первое, второе и третье число соответственно.
<span><span>Представление информации с помощью некоторого кода</span> - Кодирование
</span>
Это упорядоченная совокупность данных, которая хранится на диске и занимают отдельную область внешней памяти.
7 бит, т.к. каждая буква и пробел считается как: 1 бит.
1) y:=2*sin(x)*sqrt(x+sqrt(abs(x)))
2sinx+корень(х+корень(|x|))
2) y:=sqrt(sin(x)+sin(sqrt(x)))
корень(sinx+sin(кореньх))
<span>3) y:=sqrt(abs(x-1)+sqrt(sin(x)))
</span>корень(|x-1|+кореньsinx)