Порівняй образи роси, створені Ганною Чубач і Василем Сухомлинським. Чим вони подібні й чим відрізняються?

BEGIN
writeln('Enter A number');
realdln(A);
writeln('Enter B number');
readln(B);
if (A<>B) then
begin
A:=A*5;
B:=B-5;
end else
begin
if ((A<0) and (B<0))
begin
A:=A*A;
B:=B*B
end;
end;
writeln(A, B);
END.