var aku,sayang,kamu:integer;
begin
aku:=1;
sayang:=0;
kamu:=1;
while (sayang<=100) do
begin
aku:=aku+kamu;
inc(sayang);
inc(kamu); inc(kamu);
end;
writeln(aku);
end.
Apakah output yang akan dihasilkan?
Belum ada jawaban
{[{ data.answers.length }]} jawaban