Что бы перевести и 2-ной c.c в десятичную,необходимо разложить число по разрядам,над числом 1100,начиная с конца (т.е от знака равно) и начиная с нулевого разряда,т.е 1100(2)=(расставляем разряды над числом) (2) =(теперь для того чтобы перевести из 2-ной в 10-ную,необходимо разложить число на множители, умножая на основание данной с.с и расставляя степень числа)1*+1*+0*+0*=(затем возводим основание с.с в степень данного числа)1*8+1*4+0*2+0*1=(в итоге перемножаем и складываем)8+4+0+0=(после сложение получилось число в 10-ной с.с) 12(10), то что (...)- это система счисления,записывается нижним индексом и без скобок,т.е старшей сестре 12 лет, если она пошла в школу с 111, то это 111(2)= ==1*4+1*2+1*1=4+2+1=7(10) ---->сестра пошла в школу с 7-ми лет, тут 7 лет - 1 кл, 8 лет - 2 кл, 9 лет - 3 кл, 10 лет - 4 кл, 11 лет - 5 кл, 12 лет - 6 кл а младше сестре 100(2)= = =1*4+0*2+0*1=4 (10) года
1.1)var n,i:integer; begin writeln('Введите число n'); readln(n); for i:=1 to n do begin if (i mod 12=0) then write(i,' '); end; end. 1.2)var n,i:integer; begin writeln('Введите число n'); readln(n); i:=1; while (i<=n) do begin if (i mod 12=0) then write(i,' '); i:=i+1; end; end. 1.3)var n,i:integer; begin writeln('Введите число n'); readln(n); i:=1; repeat if (i mod 12=0)then write(i,' '); i:=i+1; until (i>n); end. 2.1)var n,i,s:integer; begin s:=0; writeln('Введите число n'); readln(n); for i:=1 to n do beginif (i mod 6=0)then s:=s+i; end; writeln('Сумма равняется ',s); end. 2.2)var n,i,s:integer; begin s:=0; writeln('Введите число n'); readln(n); i:=1; while (i<=n) do begin if (i mod 6=0) then s:=s+i; i:=i+1; end; writeln('Сумма равняется ',s); end. 2.3)var n,i,s:integer; begin s:=0; writeln('Введите число n'); readln(n); i:=1; repeat if (i mod 6=0) then s:=s+i; i:=i+1; until (i>n); writeln('Сумма равняется ',s); end.
N=2^i=2^8= 256 символов
ответ: 256 символов