Составить программу с функцией в паскаль которая находит среднее арифметическое двух чисел

vladik33316 vladik33316    1   28.07.2019 22:50    0

Ответы
lemenchuk2001 lemenchuk2001  03.10.2020 16:09
Var a,b : Real;
Function SrAr(aa,bb :Real) : Real;
Begin
  SrAr:=(aa+bb)/2;
end;
Begin
  Readln(a,b);
  Writeln(SrAr(a,b));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика