Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  lol
Language: PASCAL
Code:
program HelloWorld;
var
integer : b;
integer : a;

begin
  write("Insira um número");
  read(a);
  
  while(a = b * (b + 1) * (b + 2)) do
    write('É um número triangular');
    write(b, (b+1), (b+2));
  if not(a = b * (b + 1) * (b + 2)) then
    write('Não é um número triangular');
end.

          
          
          
Comments: