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.

22f3657f87a08a99a430dfff1bd481e4.pas