V dnešnom videu si ukážeme algoritmus, pomocou ktorého nájdeme najväčší spoločný deliteľ dvoch čísel.
Použijeme cyklus s neznámym počtom opakovaní s podmienkou na začiatku WHILE a úplnú podmienku IF.
Ak máte akékoľvek pripomienky, nebojte sa ma kontaktovať. 😉
Zadanie II. pre III.SEP
Zadania k zdrojovy subor Ziaci
Zdrojovy Subor Ziaci
14.12
Zdrojový súbor kde sú v každom riadku 2 čísla. Prvé číslo je v 10čis. sústave a druhé v 2čís. sústave, nemusia a môžu sa rovnať.
Zoznam SPZ, správne aj nesprávne
Zdrojovy subor pre ulohy obdlznik a body
Zdrojový súbor pre precvičenie práce so stringom
Zdrojový súbor pre prácu s výrazmi
Zdrojový súbor obsahujúci čísla vo viacerých riadkoch a oddelene medzerou
Zdrojový súbor obsahujúci čísla v 3 stĺpcoch a vo viacerých riadkoch
Mená so zárobkami, každé meno s jednou sumou v riadku
Rodné čísla
prvy – priemer hodnot
druhy zistit min a max
treti zistit vsetky parne a sucasne delitelne 3
Program na zistenie prvočísiel v poli
Zdroj pre čas telefonovania
Excel
Jedná sa o zlúčenie dvoch postupností, kde každá je usporiadaná a má 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 do
write(b[i],‘ ‚);
writeln;
x:=1;
y:=1;
z:=1;
while (y<11) and (x<11) do
begin
if a[x]>b[y] then begin
c[z]:=b[y];
inc(z);
if y<11 then inc(y);
end
else begin
c[z]:=a[x];
inc(z);
if x<11 then inc(x);
end;
end;
writeln;
if x<y then begin
for i:= x to 10 do
begin
c[z]:=a[i];
inc(z)
end;
end
else begin
for i:= y to 10 do
begin
c[z]:=b[i];
inc(z)
end;
end;
for i:= 1 to 20 do
write(c[i],‘ ‚);
readln;
end.
Dnes sa pozrieme na algoritmus hľadanie maximálnej hodnoty prvku v jednorozmernom poli.
Ak máte otázky, kludne ma kontaktujte na obvyklých kanáloch. 😉
https://vimeo.com/190469607
Dnes sa pozrieme na jednorozmerné pole.
Ukážeme si, ako by sa dalo priblížiť reálnemu svetu a ako pristupovať k jednotlivým položkám v poli.
Príjemné pozeranie.
V pripade akýchkoľvek nejasností ma kontaktujte 🙂
Prvý program v prostredí Lazarus