Добавь в var
N:integer;
13 строка
Readln(n);
14 строка
If a+b>n
17 строка
If a+b<n
20 строка
If a+b=n
Добавь в var
N:integer;
13 строка
Readln(n);
14 строка
If a+b>n
17 строка
If a+b<n
20 строка
If a+b=n