Найдите среднее арифметическое трёх чисел, ведённых с клавиатурыв паскаль
Найдите среднее арифметическое трёх чисел, ведённых с клавиатуры
в паскаль
Гость
Ответ(ы) на вопрос:
Гостьvar a, b, c,rez: real;
begin
writeln( 'Введите три числа' );
read ( a, b, c );
rez := ( a + b + c ) / 3
writeln ('ср. знач.=', rez:0:2 );
end.
Не нашли ответ?
Похожие вопросы