Программа для вычисления среднего арифметического из двух чисел в паскале

Question

Программа для вычисления среднего арифметического из двух чисел в паскале

Answer 1

Var a,b:integer;
begin
readln(a);
readln(b);
writeln((a+b)/2:4:2);
end.

Answer 2

Readln(a); readln(b);
c:=(a+b)/2;
write('Среднее арифметическое -', c);