Переведите числа из двоичной системы счисления в десятичную: 1)1010 2)11010 3)1001101

1)10102   = 1∙23+0∙22+1∙21+0∙20   = 8+0+2+0 = 10 102)110102   = 1∙24+1∙23+0∙22+1∙21+0∙20   = 16+8+0+2+0 = 2610  3)10011012   = 1∙26+0∙25+0∙24+1∙23+1∙22+0∙21+1∙20   = 64+0+0+8+4+0+1 = 77 10

Графический редактор paint (paint — краска), входящий в набор стандартных инструментальных средств операционной системы windows, предназначен для создания и редактирования черно-белых и цветных рисунков и чертежей. рисунки, подготовленные в редакторе paint, относятся к так называемой  растровой   графике (см. главу 4), когда изображение на экране дисплея рассматривается как совокупность, состоящая из некоторого количества строк, а каждая строка состоит из некоторого количества точек, которые принято называть пикселами, то есть элементарными единицами изображения. цвет  каждого  пиксела задается независимым от остальных образом. весь набор пикселов, из которых состоит рисунок, образует двухмерный массив  — растр   или битовую карту   изображения. основным достоинством этого способа формирования изображения является его простота. вместе с тем рисунки, построенные таким образом, плохо масштабируются, то есть увеличиваются или уменьшаются в размерах, так как при этом возникают существенные искажения изображения. подготовленные в редакторе рисунки могут быть напечатаны на принтере, перенесены в документ, созданный в текстовом редакторе, или записаны в файл на дисковое устройство. файлы, создаваемые редактором paint, по умолчанию получают стандартное расширение .bmp (от bit map — битовая карта).

1)     var   a: array[1..100]of real;   n,p,q,q1: real;   i: integer;     begin       for i: =1 to 100 do         begin           read(a[i]);           if a[i]> =0 then             begin               p: =p+a[i];               q: =q+1;             end;           if a[i]< 0 then           begin             n: =n+a[i];             q1: =q1+1;           end;       end;     writeln('positive: ',p/q);     writeln('negative: ',n/q1);   end. 2)           uses crt; var n: real; i: integer;   begin   n: =0.5;   write('  pounds','            kg');   writeln;     for i: =1 to 20 do       begin       write ('      ',n,'            ', n*0.4);       n: =n+0.5;       writeln;       end;       end. 3)   uses crt; var x: integer;   begin   write(' x','              y');   writeln;     for x: =-5 to 5 do     begin           write(x,'            ');           write(5*(x**x)+1);           writeln;     end;     end.