Deskripsi Untuk Soal Nomor 39 dan 40
const
SATU = 1;
var
n: integer;
function getta(x: integer): integer;
begin
getta := x + x;
end;
function gotta(x: integer): integer;
begin
gotta := x + x + SATU;
end;
procedure whats(x: integer);
var
g, h: integer;
begin
if x <= n then
begin
g := gotta(x);
h := getta(x);
whats(g);
writeln(x);
whats(h);
end;
end;
begin
read(n);
whats(SATU);
end.Apabila input n adalah 10, tuliskan 2 angka pertama dan 2 angka terakhir yang dicetak secara berurutan. Tuliskan angka-angka dipisahkan oleh tanda koma. Sebagai contoh, Apabila 2 angka pertama = [1, 2] dan 2 angka terakhir = [3, 4], maka tulis jawaban anda "1,2,3,4" (tanpa spasi dan tanpa tanda petik).
Apabila input n adalah 500, tuliskan 5 angka pertama dan 5 angka terakhir yang dicetak secara berurutan. Tuliskan angka-angka seperti format jawaban soal sebelumnya.
Masuk untuk menulis jawaban