Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

Б) Исправьте синтаксические ошибки:
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.