Yuk bantu teman kamu belajar dengan menambahkan soal di Kujawab. Klik disini..

Olimpiade Sains Provinsi (OSP) 2012 - Komputer , Nomor 45 - 48

Deskripsi untuk soal nomor 45 - 48

Perhatikan potongan program berikut

function func(x:integer):integer;
var
 i : integer;
 b : boolean;
begin
 b:= true;
 i := 1;
 while b=true do
 begin
 if (x mod i) <> 0 then
 begin
 func := i;
 b:=false;
 end;
 inc(i);
 end;
end;
45

Tentukan nilai dari func(4620).

46

Tentukan nilai x positif terkecil di mana func(x) = 11.

47

Tentukan bilangan x positif terkecil ke-11 di mana func(x) = 11.

48

Dengan mengasumsikan tipe integer adalah tipe bilangan bulat yang tidak memiliki batasan, berikan sepuluh nilai x positif terkecil di mana tidak ada angka positif y sehingga func(y) = x.