Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  Hw6_3.pas
Language: PASCAL
Code:
Program hw6_3;
Var num1,num2:integer;
Begin
  write('Number 1:');
  readln(num1);
  write('Number 2:');
  readln(num2);
If num1>num2 then begin
  writeln('num1 is larger.');
  writeln('num2 is smaller.');
  end
  else if num1<num2 then begin
  writeln('num2 is larger.');
  writeln('num1 is smaller.');
  end
  else if num1=num2 then begin
  writeln('They are equal.');
  end
End.          
          
Comments: