Question

5. Исправьте ошибки в программе. var c, a : integer; d : integer;begin c:=10;a:= 6; d:=2*c/(a+2;writeln('При с =' , c, '; Значение переменной d' , = ,d);end.

Answer 1

Ответ:

var

c, a : integer;

d : real;

begin

c:=10;

a:= 6;

d:=2*c/(a+2);

writeln('При с =' , c, '; Значение переменной d = ' ,d);

end.

Answer 2

Вот исправленный вариант программы:

pascalCopy code
var
  c, a, d: integer;
begin
  c := 10;
  a := 6;
  d := 2 * c / (a + 2);
  writeln('При c = ', c, '; Значение переменной d = ', d);
end.

Изменения:

1. Добавлена запятая после текста "Значение переменной d".
2. Закрыта скобка в выражении 2 * c / (a + 2).

Теперь программа должна работать правильно.