По паскалю. у ведіть два числа.менше замініть сумою - вопрос №423726 от БезумныйКами666 25.05.2021 14:26

Question

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

БезумныйКами666 · 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....