Выполните ручную трассировку( составить таблицу расчетов) и определить результаты выполнения алгоритма.

паскаль, одномерный массив

var a: array [1..6] of integer; i, max: integer;

begin

for i: =1 to 6 do read(a[i]);

max: =a[1];

for i: =1 to 6 do

if a[i]> max then max: =a[i];

writeln(max); readln; end.

в цикле sum [i]: =sum+mas[i,j];

на пиксель приходится 512*8/32²=4 бита.  2^4=16 цветов.

в1+в2=5

(в1+в2+в3)/3=3

(5+в3)/3=3

5+в3=9

в3=4