Даны целые числа m и n.если числа не равны,то - вопрос №5323515 от yuliadruzhko 05.11.2020 23:49

Question

Информатика: Даны целые числа m и n.если числа не равны,то заменить каждое из них одним и тем же числом 5, а если равны,то заменить числа нулями.

yuliadruzhko · Answer

Var m,n:integer;begin  readln(a,b);  if a b then begin a:=5; b:=5; end    else begin a:=0; b:=0; end;  writeln(a:3,b:3); end....