TI

Pertanyaan

1).Tuliskan kode pemrograman menggunakan pengulangan For ,Repeat Until,While yang mengeluarkan output angka 1,3,5,7,9

1 Jawaban

  • var i:integer;
    begin
    for i:=0 to 10 do
    if i mod 2 <> 0 then write(i,', ');

    writeln('---');

    i := 0;
    repeat
    begin
    inc(i);
    if i mod 2 <> 0 then write(i,', ');
    end
    until i < 10;

    writeln('---');

    i:=0;
    while i < 10 do
    begin
    inc(i);
    if i mod 2 <> 0 then write(i,', ');
    end;

Pertanyaan Lainnya