
Вячеслав
5 год назад
Пожалуйста посчитайте с паскалем написать (a+b)/2
ОТВЕТЫ

Румяна
Oct 24, 2020
Var
A,B:integer;
Begin
Write('A = ');ReadLn(A);
Write('B = ');ReadLn(B);
WriteLn('(A+B)/2 = ',(A+B)/2);
End.
A,B:integer;
Begin
Write('A = ');ReadLn(A);
Write('B = ');ReadLn(B);
WriteLn('(A+B)/2 = ',(A+B)/2);
End.
114
Смежные вопросы: