Question

Даны два числа a и b . Найти их среднее арифметическое : (a+b) /2
Язык Pascal

Answer 1

Ответ:

program zadacha

var a, d, c: real;

begin

readln(a, b);

c := (a+b)2;

writeln(c);

end.