Реферат Обчислення в Паскаль

Завдання № 6

лічити паскаль функція масив

Обчислити суму і добуток всіх елементів масиву T (10) (= T (10))

PROGRAM KR6; PRINTER; M; I: = 1 TO 10 DO READLN (T [I]);

WRITELN ( ВИХІДНИЙ МАСИВ А ); (LST, І ВИХІДНИЙ МАСИВ А );

S: = 0;: = 1; I: = 1 TO 10 DO S: = S + T [I] AND P: = P * T [I]; ( S = , S); ( P = P) ;.