Вводится возраст пользователя в годах. определите возраст пользователя через 5 лет

// pascalabc.net 3.3, сборка 1576 от 16.11.2017 // внимание! если программа не работает, обновите версию! begin writeln('через 5 лет вам будет ', 5 + readinteger('введите ваш возраст -> ')); end.

var

  i,n,a: integer;

begin

  readln(n);

for i: =1 to n do

begin

  read(a);

if (a mod 3=0)and(a mod 5> 0) then write(a,' ');

end;

writeln;

end.

(1 + 2):   3   = 1

1 * 2 + 3 - 4 =1

((1+2) : 3 + 4) : 5 =1

1 * 2 - 3 : (4 +5- 6) =1

1 * 2 + (3 + 4   +5) - (6 + 7) =1

((1 + 2): 3)* (4 + 5 + 6): ( 7+8) =1