Question

Nhập 2 số a, b. Kiểm tra xem chúng có cùng dấu hay không.(vd a=12 và b=1 là cùng dấu, a= -12 và b=1 là khác dấu) Mong mọi người giúp

Answer 1

var a,b : integer;

begin

      writeln('nhap so nguyen a:');

      read(a);

      writeln('nhap so nguyen b:');

      read(b);

      if ( a*b >= 0) then

           writeln(' a va b cung dau');

      else

           writeln('a va b khac dau');

     readln;

end.