Написать на языке паскаль программу ввода четырёх целых чисел и вычисления их среднего арифметического.
var a,b,c,d,e:real;
begin
read(a,b,c,d);
e:=(a+b+c+d)/4;
writeln(e:0:4);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var a,b,c,d,e:real;
begin
read(a,b,c,d);
e:=(a+b+c+d)/4;
writeln(e:0:4);
end.