АААА НУЖНА ПОМОЩЬ, ЛЮДИ ДОБРЫЕ!!!!! 9 класс, напишите программу даны два числа, не...

Question

АААА НУЖНА ПОМОЩЬ, ЛЮДИ ДОБРЫЕ!!!!!
9 класс, напишите программу
даны два числа, не равные друг другу. Замените большее из них молулем суммы, а меньшее-разностью квадратов этих чисел.

Comments

Язык

Answer 1

Program abc;
var a,b,c:integer;
begin
writeln('Введите два числа');
read(a,b);
if a>b then begin c:=a;
a:=abs(a+b);
b:=a*a-b*b; end else
if ab:=abs(a+b);
a:=b*b-a*a; end;
writeln(a,' ',b);
end.