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

Olimpiade Sains Kota (OSK) 2018 - Komputer , Nomor 33

33
var i, ans, x: integer;
begin
 ans := 0;
 x := 80;
 for i := 1 to x do
 begin
   if i mod 3 = 0 then inc(ans);
 end;
 writeln(ans);
end.

Apakah keluaran dari program di atas? a. 26 b. 27 c. 28 d. 3 e. 80