Расположите числа в порядке убывания 101001(2) 43(8) 36(16)52(10 )

Знания

Информатика

2 ответа:

lucianemoda4 года назад

0 0

52(10), 101001(2)=41(10), 43(8)=35(10), 36(16)=30(10)

Богдаг4 года назад

0 0

101001(2), 52(10) , 43(8), 36(16)

Читайте также

Составьте программу вычисления произведения элементов матрицы B(N,N),кратных 3.Турбо паскаль

Natali0107 [372]

Program JolieWErnAje;
uses crt;
const n=10;
var
a:array[1..n,1..n] of integer;
i,j: integer;
tp: integer;
begin
writeln('*** alphaues is thinking... ***');
writeln('***          OK             ***');
writeln();
tp:=1;
randomize;
for i:=1 to n do
    begin
      for j:=1 to n do
        begin
          a[i,j]:= random(20)+1; {заполняем массив}
          write(a[i,j]:4);
          if a[i,j] mod 3 = 0 then tp:=tp*a[i,j];
        end;
      writeln();
    end;
writeln();
writeln('Произведение элементов, кратных 3, равно ',tp)
end.

0 0

4 года назад

Дано натуральное число. Определите сумму цифр в нем

Cosev [6]

Var a,s:integer;
begin
readln(a);
s:=0;
while a>0 do
begin
s:=s+a mod 10;
a:=a div 10;
end;
writeln('s = ',s);
end.

Пример:
13854
<span>s = 21</span>

0 0

3 года назад

Прочитать ещё 2 ответа

Напишите программу, которая вычисляет суммы элементов массива А[1:50], заполненного числами 1,3,5,7,9

faq23 [2]

Var
A:array[1..50] of integer;
i,S:integer;
Begin
Write('Исходный массив: ');
For i:= 1 to 50 do
    Begin
    A[i]:=2*i-1;
    Write(A[i],' ');
    S:=S+A[i];
    End;
WriteLn('S = ',S)
End.

0 0

4 года назад

Как Называется служба распространение файлы

zateyNic c fugasom [12]

8. Совокупность мировых систем телекоммуникаций и циркулирующей в них информации
А) киберпространство Б) Web - сервер
B) Web – сайт Г) Web – браузер

0 0

4 года назад

Помогите сделать таблицы 2 и 3 задания

Igorfff

Там не видно вообще некоторые слова.Нормально сфотай.

0 0

4 года назад