Write a program that asks the user to enter three numbers and finds their arithmetic mean.

Program ch3;
a, b, c: integer;
s: real;
begin
writeln (‘Enter 3 space-separated integers’);
readln (a, b, c);
s: = (a + b + c) / 3;
writeln (‘The arithmetic mean of the numbers is:’, s);
readln;
end.

Be sure to pay attention to the fact that even if we took the initial numbers as integers, the variable for the arithmetic mean must be assigned the data type real, since this variable is assigned a formula containing division, and it cannot be used on the integer set.



One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.