ПРОГРАММИРОВАНИЕ (паскаль) помогите срочно пожалуйстаааа даны целые числа m и n если числа не равны,то заменить каждое из них одним и тем же числом,равном большему из исходных,а если равны,то заменить числа нулями

Question

ПРОГРАММИРОВАНИЕ (паскаль) помогите срочно пожалуйстаааа даны целые числа m и n если числа не равны,то заменить каждое из них одним и тем же числом,равном большему из исходных,а если равны,то заменить числа нулями

Гость

Ответ(ы) на вопрос:

Accepted Answer

if m=n then begin m:=0; n:=0; end else if m>n then n:=m else m:=n;