Написать программу вычисления среднего арифметического трех чисел паскаль

Question

Написать программу вычисления среднего арифметического трех чисел паскаль

Answer 1

Program z2;Var a,b,c:integer; SA:real;Begin  write('Введите 1-ое число: ');  readln(a);  write('Введите 1-ое число: ');  readln(b);  write('Введите 3-ье число: ');  readln(c);  SA:= (a + b + c) / 3;  writeln('Сумма: ', SA);End.