Jedn\u00e1 sa o zl\u00fa\u010denie dvoch postupnost\u00ed, kde ka\u017ed\u00e1 je usporiadan\u00e1 a m\u00e1 po 10 prvkov.<\/p>\n
program zlucenie4;<\/p>\n
uses crt;
\nvar x,y,z,i:integer;
\na,b,c:array[1..30]of integer;
\nbegin
\nrandomize;
\na[1]:=random(5);
\nb[1]:=random(5);<\/p>\n
for i:= 2 to 10 do
\nbegin
\na[i]:=a[i-1]+random(5);
\nb[i]:=b[i-1]+random(5);
\nend;
\nwrite(‚a: ‚);
\nfor i:= 1 to 10 do
\nwrite(a[i],‘ ‚);
\nwriteln;
\nwrite(‚b: ‚);
\nfor i:= 1 to 10 do
\nwrite(b[i],‘ ‚);
\nwriteln;
\nx:=1;
\ny:=1;
\nz:=1;
\nwhile (y<11) and (x<11) do
\nbegin
\nif a[x]>b[y] then begin
\nc[z]:=b[y];
\ninc(z);
\nif y<11 then inc(y);
\nend
\nelse begin
\nc[z]:=a[x];
\ninc(z);
\nif x<11 then inc(x);
\nend;<\/p>\n
end;
\nwriteln;
\nif x<y then begin
\nfor i:= x to 10 do
\nbegin
\nc[z]:=a[i];
\ninc(z)
\nend;
\nend
\nelse begin
\nfor i:= y to 10 do
\nbegin
\nc[z]:=b[i];
\ninc(z)
\nend;
\nend;<\/p>\n
for i:= 1 to 20 do
\nwrite(c[i],‘ ‚);<\/p>\n
readln;
\nend.<\/p>\n","protected":false},"excerpt":{"rendered":"
Jedn\u00e1 sa o zl\u00fa\u010denie dvoch postupnost\u00ed, kde ka\u017ed\u00e1 je usporiadan\u00e1 a m\u00e1 po 10 prvkov. program zlucenie4; uses crt; var x,y,z,i:integer; a,b,c:array[1..30]of integer; begin randomize; a[1]:=random(5); b[1]:=random(5); for i:= 2 to 10 do begin a[i]:=a[i-1]+random(5); b[i]:=b[i-1]+random(5); end; write(‚a: ‚); for i:= 1 to 10 do write(a[i],‘ ‚); writeln; write(‚b: ‚); for i:= 1 to 10 … Pokra\u010dova\u0165 v \u010d\u00edtan\u00ed: Zl\u00fa\u010denie usporiadan\u00fdch postupnost\u00ed<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_exactmetrics_skip_tracking":false,"_exactmetrics_sitenote_active":false,"_exactmetrics_sitenote_note":"","_exactmetrics_sitenote_category":0,"footnotes":""},"categories":[4],"tags":[10,7,11,12],"class_list":["post-148","post","type-post","status-publish","format-standard","hentry","category-pascal","tag-lazarus","tag-pascal","tag-pole","tag-zlucenie"],"_links":{"self":[{"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=\/wp\/v2\/posts\/148","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=148"}],"version-history":[{"count":1,"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=\/wp\/v2\/posts\/148\/revisions"}],"predecessor-version":[{"id":149,"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=\/wp\/v2\/posts\/148\/revisions\/149"}],"wp:attachment":[{"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=148"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=148"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.legon.sk\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=148"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}