Программа для нахождения среднего значения двух чисел. Помогите пожалуйста . Заранее спасибо )
Программа для нахождения среднего значения двух чисел. Помогите пожалуйста . Заранее спасибо )
Ответ(ы) на вопрос:
Var a,b:integer; sr:real;
begin
readln(a);
readln(b);
sr:=(a+b)/2;
writeln('Среднее значение = 'sr);
end.
Не нашли ответ?
Похожие вопросы