Тема: Turbo Pascal
Показать сообщение отдельно
Старый 26.01.2011, 17:55   #23
Emperor
Гость
Аватар для Emperor
Сообщений: n/a
Благодарностей:
0 всего

Цитата:
Сообщение от Jlo6aH Посмотреть сообщение
ну так
переменная b это как раз те числа, которые у тебя даны
каждый раз, когда цикл начинается заново, он увеличивается на 3, то есть и получится
1 3
2 6
3 9
4 12
5 15
6 18
7 21
а переменная S как раз таки суммирует все эти числа...
ясно спасибо большое)

Цитата:
Сообщение от Sky Посмотреть сообщение
S=3+6+9+12+15+18+21

var a:array [1..7] of integer;
i,j:integer;
begin
clrscr;
j:=3;
for i:=1 to 6 do begin
a[i]:=j;
j:=j+3;
end;
for i:=1 to 7 do
j:=j+a[i];
writeln('Сумма элементов равна = ',j);
end.

Буквы сам заменишь
на выделенное место ругается

Добавлено через 1 минуту
Цитата:
Сообщение от Sky Посмотреть сообщение
Я думал ему массив нужен

Добавлено через 51 секунду
Это программа уровня 8 класса. Не вижу тут трудностей, знаю больше чем уровень 8 класса, поэтому делаю по привычке
у нас такого небыло в школе)

Последний раз редактировалось Emperor; 26.01.2011 в 17:57. Причина: Добавлено сообщение
 
Ответить с цитированием