Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var a,b,c,d,x,res: integer;
begin
readln(x);
a: =x div 1000;
b: =x mod 10;
c: =x div 100 mod 10;
d: =x mod 100 div 10;
res: =a+b+c+d;
writeln(res);
readln;
end.
var a,b,c,d,e: real;
read(a,b,c,d);
e: =(a+b+c+d)/4;
writeln(e: 0: 4);
253(8)=10101011(2)
2в4(16)=1010110100(2)
48(16)=1001000(2)
5`120`000 бит = 640 000 байт = 625 кб
Популярные вопросы