Search found 1 match

Go to advanced search

by phongtran
Wed Dec 08, 2004 8:35 pm
Forum: Volume 1 (100-199)
Topic: 100 - The 3n + 1 problem
Replies: 1394
Views: 317957

Plz Help me !!!!

I still have problem with my code. it got WA. can anybody help me. Thanks you so much !!!
[pascal]
program problem_100 (input,output);
type
arr = array [1..1000000] of longint;
var
a : arr;

function compute(n : longint) : longint;
var count : longint;
begin
count := 1;
repeat
if n = 1 then ...

Go to advanced search