По паскалю. у ведіть два числа.менше замініть - вопрос №424628 от дико64 23.03.2023 07:34

Question

Информатика: По паскалю. у ведіть два числа.менше замініть сумою цих чисел, більше - їх різницею. видіть результати.

дико64 · Answer

var a,b,x,y: integer; begin writeln( vvedite 2 chisla ); readln(a,b); if a-b 0 then begin x:=a-b; y:=a+b; end else begin x:=a+b; y:=b-a; end; write( a = ,x, , b = ,y); readln; end....