Помогите помогите помогите помогите помогите помогите помогите​

Приложения:

Ответы

Ответ дал: fganown
0

Ответ:var

a, b, p:integer;

begin

readln(a) ;

readln(b) ;

if a>b then

a:=a+7

else

a:=a/4;

p:=a+b;

writeln(a, ' ', b, ' ', c);

end.

Объяснение:Вроде так)

Вас заинтересует