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