В Паскале запрещены операции, при которых возможна потеря части результата. Поэтому, в частности, запрещается присваивание целочисленной переменной вещественного значения.
На этом основании неверны операторы 2 и 3.
<h2>PascalABC.NET 3.4.2, сборка 1978 (12.02.2019)</h2>
Var
S:real;
n:integer;
Begin
S:=0;
Write('n = ');
ReadLn(n);
For n:= 1 to n do
S:=S+n/(n+1);
WriteLn('S = ',S)
End.
Var n,a,max,i:integer;
begin
write('n = ');
readln(n);
max:=-30000;
writeln('Вводите числа:');
for i:=1 to n do
begin
readln(a);
if (abs(a) mod 10=3)and(a<0)and(a>max) then max:=a;
end;
if max=-30000 then writeln('Нет чисел, оканчивающихся на 3')
else writeln('max = ',max);
end.
Пример:
<span>n = 5
Вводите числа:
5
618
-703
103
-243
-815max = -243</span>
True
во втором все то,что без скобок
12