ewwa93

Skeliame nugalėtoją:

Sveiki :)

Sveikas,

Mums kaip ir labiausiai tinka tavo sukurtas logotipas ar gali jam pasiūlyti panašių variantų spalvų, šrifto?

Pagarbiai,

Husvindu Team

Sveiki,

Skelbiamas logotipo konkursas el. svetainei husvindu.no. Svetainės pavadinimas Husvindu (Hus - namas,Vindu- langas).

Svetainėje bus plėtojama langų prekyba.

Pagrindinės mūsų parduotuvės vertybės yra šiluma, sveikata, saugumas, jaukumas, modernus dizainas, gamta, kokybė, ilgaamžiškumas.

Logotipe noriu, kad būtų estetiškas ir skandinaviško stiliaus.

Logotipas turėtų būt minimalistinis, estetiškai tvarkingai, kad nebūtų labai perkrautas, jis gali būti spalvotas (nebūtinai), bet, kad taip pat gerai žiūrėtųsi ir juodai baltas.

Logotipas bus naudojamas įmonės puslapyje, pašto paraše, facebooke.

Konkurso nugalėtoją paskelbsiu rugpjūčio 14 dieną. Prizas - €60.

http://www.egzaminai.lt/failai/511_uzduotys_2008_VBE_IT.pdf

14 psl yra uzduotis ir reikia kaip nors ja realizuoti

as bandau bet nesigauna

program Bevardë207;

type mas= array [1..100] of integer ;

var a,b:text;

i,mars,kel,y,n,sum,sk,min,j,tarp,suma,sumis,skc:integer;

M,K,G:mas;

begin

assign(a,'U1.txt');

reset(a);

assign(b,'U1rez.txt');

rewrite(b);

readln(a,n); sum:=0;

for i:=1 to n do begin

read(a,mars,kel);

M:=mars;

K:=kel;

end;

for i := 1 to n-1 do

begin

min := i;

for j := i+1 to n do

if M[min]>M[j]

then min := j;

tarp := M;

M := M[min];

M[min] := tarp;

end;

suma:=0; writeln;

for i:=1 to n do if M<>M[i+1] then begin write(M,' ');

suma:=suma+1;

G[suma]:=M;

end;

skc:=0;

for i:=1 to suma do begin

skc:=skc+1;

for y:=1+skc to n do begin

if G=M[y] then begin sumis:=sumis+K[y];

end;

end;

writeln(' ');

write(sumis,' ');

sumis:=0;

end;

end.

man reikia kad nuskaitytu skaiciu 123456789101112131415 koks tokio skaiciaus tipas????

būtų zjbs :) sutartume :)

dėl atlygio sutarsime asmeniškai

1. Pavasaris

Maksimali taškų suma – 20 taškų

Kai kuriomis gegužės mėnesio dienomis oro temperatūra buvo matuojama tris kartus: ryte, vidurdienį ir vakare. Parašykite programą rasti dienai (dienoms), kai:

1) temperatūra buvo aukščiausia;

2) visų trijų (ryto, vidurdienio ir vakaro) matavimų temperatūra buvo ne žemesnė kaip 20 laipsnių.

Pradiniai duomenys surašyti tekstiniame faile U1duom.txt. Pirmoje eilutėje nurodytas dienų, kuriomis buvo matuota temperatūra, skaičius n (1 ≤ n ≤ 31). Tolesnėse eilutėse nurodyti matavimų duomenys. Viena eilutė skiriama vienos dienos matavimams. Čia įrašyti keturi sveikieji skaičiai: dienos numeris

(1 ≤ d ≤ 31), temperatūra ryte, vidurdienį ir vakare.

Rezultatai turi būti spausdinami tekstiniame faile U1rez.txt. Pirmoje eilutėje spausdinama diena ar dienos, kai temperatūra buvo aukščiausia, antroje eilutėje – dienos, kuriomis visų dienos matavimų temperatūra buvo ne žemesnė kaip 20 laipsnių. Jeigu tokių dienų nebuvo, spausdinamas skaičius 0 (nulis). Skaičiai turi būti atskirti bent vienu tarpu.

Nurodymai:

 Rašydami programą naudokite tik vienmačius sveikųjų skaičių masyvus.

 Parašykite funkciją aukščiausios temperatūros reikšmei rasti.

 Parašykite procedūrą dienų, kuriomis buvo aukščiausia temperatūra, numeriams įrašyti į failą.

 Parašykite procedūrą dienų, kuriomis visą dieną temperatūra buvo ne žemesnė kaip 20 laipsnių, numeriams įrašyti į failą.

Pavyzdys

U1duom.txt

10

6 13 15 22

9 20 19 18

10 10 25 16

11 12 25 25

13 14 14 25

15 10 10 10

18 21 21 22

22 15 23 13

25 25 15 15

29 22 24 24

U1rez.txt

10 11 13 25

18 29

darbas123.doc

free pascal 0.6.4.a

28. Du gretimi nelyginiai pirminiai skaičiai vadinami dvyniais. Pvz.: 5 ir 7. Nustatykite, ar du duoti pirminiai skaičiai M ir N yra dvyniai.

29. Jei sudėtume visus kurio nors skaičiaus skaitmenis, po to – visos gautos sumos skaitmenis ir tai kartotume daug kartų, pagaliau gautume vienaženklį skaičių, vadinamą duoto skaičiaus skaitmenine šaknimi. Pvz.: 751 skaitmeninė šaknis 4 (7+5+1=13, 1+3=4). Raskite skaičiaus N skaitmeninę šaknį.

27. V.Kordenskis surado įdomų skaičių, kuris lygus skaitmenų faktorialų sumai. Pvz.: 145=1!+4!+5!. Nustatykite, ar duotas skaičius N yra Kordenskio skaičius.

15. Duotas natūralus skaičius n. Sudarykite programą, kuri nustatytų, ar skaičius yra kieno nors faktorialas, ar ne. Pvz.: n = 24, tai ieškomas skaičius 4, nes 4!= 24.

čia reikia su funkcijomis ir proceduromis :) Atsilyginsiu :)

II. Parašykite programą, apskaičiuojančią, kiek lyginių triženklio skaičiaus skaitmenų suma didesnė už nelyginių skaitmenų sumą.

III. Parašykite programą, randančią didžiausiojo ir mažiausiojo keturženklio skaičiaus skaitmenų vidurkį ir likusių skaitmenų vidurkį. Labai prašau reik atsiskaityt iki vakara