2002 variant A
- Daný program po načítaní dvoch čísel A a
B, nakreslí z hviezdičiek nejaký obrázok:
var i,j,A,B:integer;
begin
read(A,B);
for i:=1 to A+B do
begin
for j:=1 to A+B do
if i<=A then
if i>=j then write('*')
else write(' ')
else
if j<A then write(' ')
else if i>j then write('*');
writeln;
end;
end;
- Zistite, koľko hviezdičiek sa nakreslí, ak sme na vstupe
zadali A=7 a B=8 ?
- Zistite všetky kombinácie vstupných hodnôt
A a B, pre ktoré sa nakreslil obrázok presne zo 111 hviezdičiek.
- Je daná časť programu, ktorá spracováva
N prvkové pole a celých čísel tak, že redukuje duplikáty.
T.j. po skončení programu sa každý prvok v poli nachádza
iba raz a pole sa príslušne skráti (zmení sa N - počet
prvkov poľa). V programe však niekto omylom vymenil niektoré výskyty
premennej j za premennú i. Opravte program!
i:=2; j:=1;
while i<=N do
begin
k:=1;
while (k<=i) and (a[k]<>a[i]) do
k:=k+1;
if k>i then
begin i:=i+1; a[i]:=a[i] end;
i:=i+1;
end;
N:=j;
- V banke sú 3 okienka a pred každým stojí
rad N zákazníkov. Každého zákazníka
v prvom rade obslúžia za 3 minúty, v druhom za 2 minúty
a v treťom za 5 minút. Ak sa niektorý rad vyprázdni,
všetci čakajúci zákazníci v ostatných radoch
(okrem prvých dvoch zákazníkov) sa rýchlo presunú
k tomuto okienku a vytvoria tu nový rad.
Zistite, o aký
čas obslúžia všetkých zákazníkov (ako dlho musel
čakať posledný zo všetkých 3*N zákazníkov,
kým bol obslúžený)
- pre N=6.
- pre N=30.
- Napíšte program, ktorý pre dané N
vypíše čísla 1, 2, ..., N do štyroch riadkov nasledovne:
- v prvom riadku budú všetky čísla (z intervalu 1..N)
končiace cifrou 9;
- v druhom riadku budú všetky čísla (z intervalu 1..N)
deliteľné 6;
- v treťom riadku budú všetky čísla (z intervalu 1..N),
ktoré sú mocninou 2;
- v poslednom riadku budú všetky čísla (z intervalu
1..N), ktoré nie sú ani v jednom z predchádzajúcich
riadkov.
Môžete použiť ľubovoľný programovací jazyk, ktorý
ste používali na strednej škole.
© AB