Проанализируй диаграмму и заполни таблицу. A B
1 Товар Количество товара
2 Товар "W" 126
3 Товар "X"
4 Товар "Y"
5 Товар "Z" 126

Товар "Z" - 25%

Товар "Y" - 25%

Товар "X" - 25%

Товар "W" - 25%

program p_1; var i, n : integer; a, s : real; b : array [1..1000] of real; begin writeln('введите число а'); readln(a); writeln('введите количество значений массива n'); readln(n); write('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if b[i] > a then s: =s+b[i]; writeln('сумма значений =', s); end.

а)сумм(a5: b7)

б)срзнач(c4: c7)