Б) исправьте синтаксические ошибки: program primer 1; var l2,3j integer r real; begin 3j=3e-01 read (i1, i2) i1+i2+i3: =r writeln r end;

Program PRIMER;

var
  I1, I2: INTEGER;
  J3, R: REAL;

begin
  J3 := 3E-01;
  READ(I1, I2);
  R := I1 + I2 + J3;
  WRITELN(R)
end.

Это Паскаль?  Если Паскаль, то по-другому будет:
PROGRAM PRIMER 1;
VAR I1,I2: INTEGER;
R,J3: REAL;
BEGIN
J3:=3E-01;
READ (I1, I2);
R:=I1+I2+J3;
WRITELN(R);
END.