Здраствуйте)Прошу помочь!!!!Мне нужно решить задачу, расписав её для паскаля, прошу очень...

0 голосов
29 просмотров

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


Информатика (14 баллов) | 29 просмотров
Дан 1 ответ
0 голосов

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.

(248 баллов)
0

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

0

Что это?

0

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

0

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