Question

Не могу решить дз,помогите плиз. Здесь предоставлена программа, которую вы должны набрать на компьютере и выполнить поставленное задание, НО в ваших программах допущены ошибки. Исправьте эти ошибки, тогда программа выполнит решение: Даны три числа a, b, с. Найти их среднее арифметическое. program sredneeArifmet begin var a,b,c,d integer; a =8; writeln ((a+b+c)/2); b =3; c =5; end

Answer 1

Ответ:

begin

 var a, b, c, d: integer;

 a := 8;

 b := 3;

 c := 5;

 writeln((a+b+c)/3)

end.

Объяснение:

Answer 2

В предоставленной программе есть несколько ошибок. Вот исправленный вариант:

program sredneeArifmet; var a, b, c: integer; begin a := 8; // заменяем a+ на a := b := 0; // добавляем инициализацию переменной b c := 0; // добавляем инициализацию переменной c b := 3; // заменяем b+ на b := c := 5; // заменяем c+ на c := writeln((a + b + c) / 3); // исправляем формулу для нахождения среднего арифметического end.