About Repeat.. until and While.. do

Hi, am new here.. anyway, I was hoping somebody could give me information about programming using repeat and while..

The problem is :

using while .. do

5
5 4
5 4 3
5 4 3 2
5 4 3 2 1


and using repeat until
1 2 3 4 5
1 2 3 4
1 2 3
1 2
1


I've been puzzling over this for a while and all my efforts have given me an output of:
5
4
3
2
1

for the 'while' and similar output for the 'repeat'

Is the process similar to the 'for'?
I've been able to do the required output using FOR command, but I cannot seem to apply it to REPEAT and WHILE.

Your help would be greatly appreciated.

Comments

  • [code]
    program looptest;

    var
    I, N:integer;

    begin
    WriteLn('using while .. do');
    N:=5;
    while ( N >= 1 ) do begin
    I:=5;
    while (I >= N ) do begin
    write(I ,#32);
    dec(I)
    end;
    writeln;
    dec(N);
    end;
    WriteLn( 'using repeat .. until');
    N:=5;
    repeat
    I:=0;
    repeat
    inc(I);
    write(I, #32);
    until ( I >= N );
    writeln;
    dec(N);
    until ( N < 1 );
    end.
    [/code]
  • The code is a great help.. now I'm beginning to understand the logic involved better :)

    Many thanks for your quick reply!
Sign In or Register to comment.

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories