Найдите среднее арифметическое трёх чисел, ведённых с клавиатуры
в паскаль

1

Ответы и объяснения

  • infor5
  • главный мозг
2013-11-19T16:47:23+00:00
Var a, b, c,rez: real;
begin
writeln( 'Введите три числа' );
read ( a, b, c );
rez := ( a + b + c ) / 3 
writeln ('ср. знач.=', rez:0:2 ); 
end.