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

Question

Камила Воронцова

Информатика

22 января, 04:51

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

+3

Ответы (1)

Знаешь ответ на этот вопрос?

Gefest · Answer 1

Pascal:

var a, b, s:real;

begin

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

readln (a, b);

s: = (a+b) / 2;

write ('Среднее арифметическое=', s:0:2);

readln

end.