Перевести числа из десятичной системы счисления в двоичную систему счисления 28 (10) , 42(10) , 71(10)

106

494

Посмотреть ответы 1

Ответы на вопрос:

sofiaivkina84

Информатика

4,7(99 оценок)

1.const n=10; var a: array[1..n] of integer; i,min,max: integer; beginfor i: =1 to n do a[i]: =random(50); for i: =1 to n do write(a[i]: 4); writeln; min: =32000; max: =-32000; for i: =1 to n doif a[i]< min then min: =a[i]; for i: =1 to n do if a[i]> max then max: =a[i]; writeln('минимальный элемент массива = ',min); writeln('максимальный элемент массива= ',max); end.2.const n=10; var a: array[1..n] of integer; i,j,p: integer; beginfor i: =1 to n do a[i]: =random(20); for i: =1 to n do write(a[i]: 4); writeln; for i: =1 to n-1 do beginfor j: =1 to n-1 doif a[j]< =a[j+1] then beginp: =a[j]; a[j]: =a[j+1]; a[j+1]: =p; end; end; for i: =1 to n do write(a[i]: 4); end.