то есть вот таблица тебе на будущее. 1 бит- это 8 байт. 1 килобайт- 1024 байта. 1 мегабайт-1024 килобайта. и 1 гигабайт-1024 мегабайта
Вред это то что ребенок ниче неделает сидит в интернете днями иночами портит зрение дети заходят на взрослые сайты родители забывают детях и седят в соц сетях пользат это што дети могут смотреть уроки общатся с друзьями и тд
Var
a, n, sum1, sum2, k: longint;
begin
a := 100000;
while a <> 999999 do
begin
sum1 := 0; sum2 := 0;
n := a div 1000;
sum1 := n div 100 + (n div 10) mod 10 + n mod 10;
n := a mod 1000;
sum2 := n div 10 + (n div 100) mod 10 + n mod 10;
if sum1 = sum2 then
begin
writeln(a, ' - "счастливый" билет');
k := k + 1;
end;
a := a + 1;
end;
writeln('Всего ', k, ' таких билетов');
readln
<span>end.</span>
57(8)=5*8+7*1= 47
2014(16)=2*16^3+0*16^2+1*16+4=8212
7(1)=7 7^1=7
7(2)=49 7^2=49
7(3)=..3
<span>7(4)=..1
8212 нацело делиться на 4 .Значит ответ 7</span>