Deskripsi untuk soal nomor 35 - 36

function asik(a,b,x : integer) : integer;
var i:integer;
begin
    for i:= 1 to x do
        a := a+b;
    asik := a;
end;
function seru(a,b,x : integer) : integer;
var i:integer;
begin
    for i:= 1 to x do
    begin
        a := a-b;
        break;
    end;
    seru := a;
end;
bebek(1));