1)<span>1110001000+110100100=100+210=310 </span>
<span><span>2) 1001001101+1111000= 294,5-60=234,5</span></span>
<span><span><span>3) 111100010,0101+1111111,01= нз</span></span></span>
<span><span><span><span>4) 1010111001-1010001011= 348,5-325,5=23</span>
<span>5) 1110101011-100111000= 469,5-156=313,5</span>
<span>6) 1110111000,011-111001101,001= нз</span>
<span>7) 1011010*1000010= 47*33=1551</span>
<span>8) 111010110:1010= 234,5:5=46,9</span></span></span></span>
1)
var a, z, s: integer;
begin
write('<em>Введите число: </em>');
read(z);
a := z;
while a > 0 do
begin
s := s + a mod 10;
a := a div 10
end;
write('<em>Сумма цифр числа</em> ', z, ' = ', s)
end.
У нас таких учебников нет Откуда мы знаем что это за задача
Допустим число 123. Нам нужно найти первое, второе и третье его число.
То есть 1,2,3. потом их сложить или перемножить.
Чтобы найти первое число нужно 123 разделить на 100,получиться 1.23,его мы округляем и получаем 1.
Второе мы находим деля 123 на 100,получаем остаток 23, делим остаток на 10 и получаем 2.
Третье число мы находим деля 123 на 10 и получаем остаток.
Потом складываем их или перемножаем.
Пример на pascal:
//div это делить,mod отстаток
var a,b,c,s: integer;
begin
Write('Введи число: ');
Read(s);
a:= s div 100;
b:= s mod 100 div 10;
c:= s mod 10;
WriteLn('Сумма: '+a+b+c);
WriteLn('Произведение: '+a*b*c);
end.
27, т.к. а>b. тратата мы везем кота в этот раз....