Hasilnya seperti diatas, penggunaan repeat until dalam bahasa pemrogaman pascal yang mempunyai kelebihan tersendiri dari perulangan yang lainya, dan rasakan sendiri kelebihanya, contoh dasar perogramnya:
program repeatuntil;
uses wincrt;
var
i:integer;
begin
i:=0;
repeat inc(i);
write(sqr(i),',');
until i=4;
end.
cobalah dan pahami dengan sendiri insyallah akan berguna dan bermanfaat
Tidak ada komentar:
Posting Komentar