Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var n,a,b,c,d,s: integer;
begin
write('n='); readln(n); {n - даанное 4-хзначное число}
a: =n mod 10; {последняя, 4-я, цифра числа}
b: =(n div 10) mod 10; {предпоследняя, 3-я, цифра}
c: =(n div 100) mod 10; {2-я цифра}
d: =n div 1000; {1-я цифра}
s: =a+b+c+d;
writeln('s=',s);
end.
32 кбит/с*16 с=524288 бит=65536 кбайт.
вес 1 страницы=8*48=384 бит.48
кол-во стр=524288/384=1365 страниц
program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.
3*2=6128*512*6=393216ъ128+512=640640: 10=6464*6=384кб
Популярные вопросы