Question

Программа Паскаль абс
Определить, является ли число С средним арифметическим чисел А и Б (А,Б,С-вводятся с клавиатуры).
(Написать программу).

Answer 1

var a,b,c:real;
begin
readln(a);
readln(b);
readln(c);
if c=(a+b)/2 then writeln('True') else writeln('False');
end.