int main ()
{
int a[20];
int n, i;
n = 20;
for (i = 0; i < n; i++)
*(a + i) = i*(3 * i);
for (i = 0; i < n; i++)
printf ("%d ", *(a + i));
printf("\n");
for (i = 1; i < n - 1; i++)
*(a + i) = (*(a + i - 1) + *(a + i) + *(a + i + 1))/3;
for (i = 0; i < n; i++)
printf ("%d ", *(a + i));
printf("\n");
}
Как то так, но не уверен.
Выполнение компьютером программ без участия пользователя, т.е ответ b.
Каждый символ может иметь 64 значения, то есть 2^6, тогда на каждый символ выделяется 6 бит.Всего символов - 100. Значит всего нужно 6*100=600 бит=75 байт.
Var
a:Array [1..20] Of Integer;
i:Integer;
k:Integer;
Begin
write('Введите количество элементов массива не более 20:');
Read(k);
For i:=1 To k Do
Read(a[i]);
<span>End.</span>