Что выведет этот фрагмент программы: A = [23, 12, 3, 8, 15]
i = 1
A[2] = A[i] + 2*A[i-1] + A[3*i]
print(A[2] + A[4])

81

Объяснение:

12+2*23+8=66

66+15=81

100 кбайт = 100 * 8 = 800 кбит

800 : 1024 = 0,78125 мбит

0,78125 : 100 = 0,0078125 сек

program xxx;   var a, b, min : integer; begin  write('введите число а=');  

    readln(a);

  min: =10;   while a < > 0 do      begin            b: = a mod 10;             if b < min then min: =b;             a: = a div 10      end;     writeln('минимальная цифра = ', min);   readlnend.