Предмет: Информатика,
автор: Prozerox
Помогите составить программу для нахождения среднего арифметического 4 чисел в паскале
Ответы
Автор ответа:
0
uses crt;
var
i,y,x,z:integer;
n:single;
begin
clrscr;
writeln('Введите 4 числа');
readln(i,z,x,y);
n:=(x+y+z+i)/4;
writeln('Среднее= ',n:0:3);
readln();
end.
Интересные вопросы
Предмет: Математика,
автор: Аноним
Предмет: Литература,
автор: rtmsavko
Предмет: Русский язык,
автор: aygh19635
Предмет: Математика,
автор: Аноним