Алгоритм в прикрепленном файле, для графического исполнителя "Стрелочка"
Program z1; const n = 15; Var a: array [1..n] of integer; i:integer; s:real;Begin for i:=1 to n do read(a[i]); for i:=1 to n do write (a[i],' '); s:=0; for i:=1 to n do s:=s+a[i]; s:=s/n; writeln; writeln('Сумма элементов = ',s);End.<span>
</span>
Program project1;
var
x,A: integer;
begin
write('x:');
readln(x);
if (x>=-7) and (x<=7) then
A:=15
else
A:=5;
writeln(A);
readln;
end.
Т.к. система счисления в которую переводим двоичная, то следует делить на 2:
1) 234:
234 / 2 = 117 остаток 0
117 / 2 = 58 остаток 1
58 / 2 = 29 остаток 0
29 / 2 = 14 остаток 1
14 / 2 = 7 остаток 0
7 / 2 = 3 остаток 1
3 / 2 = 1 остаток 1
1 / 2 = 0 остаток 1
Ответ: 234(10) = 11101010(2)
2) 25:
25 / 2 = 12 остаток 1
12 / 2 = 6 остаток 0
6 / 2 = 3 остаток 0
3 / 2 = 1 остаток 1
1 / 2 = 0 остаток 1
Ответ: 25(10) = 11001(2)