Program gt;
var a,i,n,max:longint;
begin
read(N);
max:=0;
for i:=1 to n do
begin
read(A);
if(a>max)then max:=a;
end;
if(max=0)then writeln('положительных чисел нет')else writeln(max);
end.
Озу ...............................
1- 110111
2-42
Для перевода числа из одной системы счисления в другую необходимо воспользоваться таблицей двоичной системы счисления.
Ответ: 11
Объяснение:
Дан массив. Данная программа считает сумму тех элементов массива
которые меньше 4.
То есть:
Dat[4]+Dat[5] +Dat[6] +Dat[10]=3+2+3+3=11