ulvis.paste.net

Paste Search Dynamic
Recent pastes
sum
  1. Module Module1
  2.  
  3.     sub Main()
  4.         dim lb as integer
  5.         dim sum as integer
  6.  
  7.         lb = Console.ReadLine()
  8.         Console.WriteLine(lb)
  9.         sum = lb
  10.         while (lb=Console.ReadLine())
  11.  
  12.                 sum += lb
  13.             Console.WriteLine(sum)
  14.             lb=0
  15.         end while
  16.     end sub
  17.  
  18. end Module
  19.  
Parsed in 0.003 seconds