|
Документ взят из кэша поисковой машины. Адрес
оригинального документа
: http://colamo.parallel.ru/6.html
Дата изменения: Sun May 31 15:02:11 2009 Дата индексирования: Mon Oct 1 19:38:01 2012 Кодировка: koi8-r |
Var A: REG;
Var B: Array [100: Stream];
Var C, I;
CADR a; A=0; ENDCadr;
CADR b; FOR I=1 TO 100 BEGIN
A=A+B[I]; C=A; END;
ENDCadr;
а) последовательная программа
Var A: REG;
Var B: Array [25: Stream, 4: Vector];
Var C,I;
CADR b; FOR I=1 TO 25
A=A+((B[I,1]+B[I,2])+(B[I,3]+B[I,4]));
C=A;
ENDCadr;
б) параллельная программа
Рис.6. Программы и граф-схемы вычислительных структур нахождения суммы элементов массива