Помогите с заданиями на фото. Даю 30 баллов. Пожалуйстаааа...

есть разница какой язык, или нет?
Objekt Pascal:
1)var A:array [1..25] of integer;
begin
A[10]:=7;
end;
3)var A:array[1..N] of integer;
B:integer;
begin
for 1 to N do
if A[B] mod 2 then
A[B]:=A[B]+1;
НО! информация не точная, так как во первых: я давненько не работала с языком Объект Паскаль, но подозреваю, что сейчас в школах его изучают; во вторых: пол двенадцатого ночи, соображать трудно:)