Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Помогите с блок схемой

Автор: Juhn 24.01.2008 23:50

Помогите пожалуйста написать блок схему вот к этой программе:
program summa;
var
a: array [0..9] of integer;
b:integer;
i:integer;
begin
for i:=0 to 9 do
begin
write('a',i+1,'=');
readln(a[i]);
end;
b:=0;
for i:=0 to 9 do
begin
b:=b+a[i];
end;
writeln(b);
readln;
end.

Условие задачи: Дан массив из 10 целых чисел. Найти сумму элементов данного массива.

Автор: Yevgeny 25.01.2008 1:28

Вот что у меня вышло smile.gif Прикрепленное изображение

Автор: Juhn 25.01.2008 1:45

Спасибо smile.gif