Ответ(ы) на вопрос:
ГостьVar
A,B:integer;
Begin
Write('A = ');ReadLn(A);
Write('B = ');ReadLn(B);
WriteLn('(A+B)/2 = ',(A+B)/2);
End.
Не нашли ответ?
Похожие вопросы
Гость