Пожалуйста помогите написать програмку

[Данил28]

Я просто ничего не понимаю, от слова совсем ) Что ещё в коде поменять ?

[Aleksandr H.]

после каждой строчки Procedure напиши

var i, j,s: integer;
    flag: boolean;

[digitalis]

flag и s могли быть глобальными, а вот параметры цикла i,j д. быть локальными - принципиально. В Си, кстати - не обязательно.

[Aleksandr H.]

digitalis,

Сообщение от Данил28

Я просто ничего не понимаю, от слова совсем )

о каких глобальных/локальных переменах идет речь?

[ViktorR]

digitalis и к ТС это тоже.
Обратите внимание на то, что у ТС Pascal ABC, а newerow1989 не знает этого семейства и написал по стандарту:

for i:=1 to n do

На подобные штуки компилятор и матерится (видно на скриншоте).
Он требует, что бы заголовок цикла был подобен:

for var i := 1 to n do

Т.е. описание переменной цикла должно быть в заголовке этого цикла ...

[digitalis]

Локальные переменные локализованы в процедуре, глобальные доступны в любом месте программы.

о каких переменах идет речь?

"Перемен! - требуют наши сердца!" , но не будем об политике.
Насчёт АБЦ - х.з. как там у них. Я - про нормальный Паскаль.

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

for var i := 1 to n do

Т.е. описание переменной цикла должно быть в заголовке этого цикла ...

А мой вариант он (АБЦ) тоже обматерит?

[digitalis]

......

[newerow1989]

Сообщение от Данил28

Добрый день, во такая ошибка.

Добрый день. Я на этом форуме пишу программы на Delphi (консольный режим).
А так 19-й пост верный!