Решите на паскале. на все 3 цикла: найти среднее арифметическое десяти введённых чисел.

usereldoc9857 usereldoc9857    2   26.09.2019 22:10    0

Ответы
АндрейZAV АндрейZAV  08.10.2020 21:14

var

a, b, c: integer;

s: real;

begin

writeln('Введите три числа');

readln(a);

readln(b);

readln(c);

s := (a + b + c) / 3;

writeln('Среднее арифметическое трех введенных чисел равно ', s);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Математика