Question

Здраствуйте)Прошу помочь!!!!Мне нужно решить задачу, расписав её для паскаля, прошу очень подробно!!!Вот сама задача - Дан массив из N элементов.Написать программу, уменьшающую все элементы массива на единицу.

Answer 1

program sss;
var i,n,k:integer; a:array[1..100]of integer;
for i:=1 to n do
begin
read(k);
a[i] := k - 1;
write(a[i],' ');
end;
end.

Answer 2

Пишет ; Ошибка ожидался индификатор

Answer 3

Что это?

Answer 4

в какой строке?

Answer 5

а, begin вставь между var i,n,k:integer; a:array[1..100]of integer; и for i:=1 to n do