1. Разработать схему алгоритма для ввода четырёх целых чисел и вычисления их среднего арифметического.
program srednee;
var a,b,c,d: integer;
s: real;
begin
writeln (Введите 4 числа);
readln (a,b,c,d);
s:=(a+b+c+d)/4;
writeln (Среднее, , арифметическое:, , s);
end.
Оцени ответ