const n = 10; //кол-во элементов в массиве
var i, sum, proiz: longint;
a: array [1..n] of longint;
begin sum: =0; proiz: =1;
for i : = 1 to n do
begin
a[i] : = random(10)+1; //заполнение массива
write(a[i], ' '); //вывод
end;
writeln;
for i : = 1 to n do
begin
sum : = sum + a[i]; //сумма
proiz : = proiz * a[i]; //произведение
end; writeln('сумма ',sum);
writeln('произведение ',proiz);
end.
const n = 10; //кол-во элементов в массиве
var i, sum, proiz: longint;
a: array [1..n] of longint;
begin
sum: =0;
proiz: =1;
for i : = 1 to n do
begin
a[i] : = random(10)+1; //заполнение массива
write(a[i], ' '); //вывод
end;
writeln;
for i : = 1 to n do
begin
sum : = sum + a[i]; //сумма
proiz : = proiz * a[i]; //произведение
end;
writeln('сумма ',sum);
writeln('произведение ',proiz);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Переведите, , в десятичную сис-му счисления: 110110; 1101011. как переводить в двоичную я разобралась, а в десятичную не буду за решение.