[@Jlo6aH]

массивы то сюда зачем О_О

Я думал ему массив нужен

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

Сообщение от 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 класса, поэтому делаю по привычке

у нас такого небыло в школе)

Попробуй удалить, нет?

можеш ето убрать , clrscr -очистка экрана , можно ставить , можно неставить

У меня лицей с усиленным программированием, математикой, физикой. Программирование как орешки)

Сообщение от Sky

Попробуй удалить, нет?

без него тупо не запускается

Сообщение от Sky

У меня лицей с усиленным программированием, математикой, физикой. Программирование как орешки)

В москве живеш ?

Нет. Санкт-Петербург. 393.

Добавлено через 32 секунды
Значит пропиши сначала самого
uses crt;

Добавлено через 1 минуту
Лушче использовать программу Jlo6aH, она как раз для таких как ты

Сообщение от Sky

Нет. Санкт-Петербург. 393.

Добавлено через 32 секунды
Значит пропиши сначала самого
uses crt;

Добавлено через 1 минуту
Лушче использовать программу Jlo6aH, она как раз для таких как ты

оч смешно) все равно, спасибо всем кто помогал.