Ответ:
201101; 2102; 100121021; 10011110; 110001.
Объяснение:
Число получается делением на основание новой:
100/3 = 33 (ост 1)
33/3 = 11 (ост 0)
11/3 = 3 (ост 2)
3/3 = 0 (ост 0)
и добавляем 1 так как последний раз делили 3
10201
//PascalABC.NET
//Версия 3.3, сборка 1611
begin
var a:=ReadSeqIntegerWhile(x->x<>0).ToArray();
a.Transform(x->x*x);
write(a.Sum());
end.
Ответ: Переводишь 57 в двоичную это 111001. Делаешь инверсию и получаешь 000110, добавляешь 1 (т.к знак - тоже имеет ячейку) и получаешь 111 - это 7 в 8-разрядной ячейке памяти
Смотря с чего начинается с 0 или 1 массив , я просто решил написать пример программы , тут сам вводишь 10 чисел
var
i , k, n:integer;
a: array [1..10] of integer;
begin
for i:=1 to 10 do readln(a[i]);k:=a[1]*a[2]*a[3];
n:=a[10]*a[9]*a[8];
writeln('произведение первых трех чисел= ',k);
<span>writeln('произведение последних трёх чисел= ', n);</span>
end.
- не использовать знаки ? / и некоторые др.
- длина имени не более 20 символов
- имя файла отражает содержимое