Új hozzászólás Aktív témák

• #4961 timo92 csendes tag

  Új Válasz 2011-02-08 16:49:40 #4961

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  timo92

  csendes tag

  program lottosz;
  uses crt;
  var
  a,x,i,j,w : integer;
  szam : array[1..5] of integer;
  begin
  clrscr;
  writeln('Kerem az 52. heti nyeroszamokat: ');
  for x:=1 to 5 do
  begin
  read(szam[j]);
  write(' ');
  end;
  for i:=1 to 5 do
  for j:=1 to i+1 do
  if(szam[j] > szam[j+1] )then
  begin
  w := szam[j];
  szam[j] := szam[j+1];
  szam[j+1] := w;
  end;
  for i:=1 to 5 do
  begin
  write(szam[j]);
  i:=i+1;
  j:=j+1;
  end;
  end.

  a lottósnál eddig jutottam.... a másik az semmi...

• #4959 timo92 csendes tag

  Új Válasz 2011-02-08 15:50:17 #4959

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  timo92

  csendes tag

  Van még egy programom

  A kihúzott heti számok soronként vannak megadva, egy héten belüli számok pedig szóközzel vannak elválasztva.

  Például: 37 42 44 61 62
  18 42 54 83 89
  ... 9 20 21 59 68

  A lottószámok minden sorban rendezve szerepelnek. Az állományból kimaradtak az 52. hét lottószámai. Ezek a következők voltak: 90 42 43 11 23.

  Készítsen programot a következő feladatok megoldására!

  1. Kérje be a felhasználótól az 52. hét megadott lottószámait!

  2. A program rendezze a bekért lottószámokat emelkedő sorrendbe! A rendezett számokat írja ki az állomány végére!

  3. Kérjen be a felhasználótól egy egész számot 1-51 között! A bekért adatot nem kell ellenőrizni!

  4. Írja ki a képernyőre a bekért számnak megfelelő sorszámú hét lottószámait, a lottosz.txt állományban lévő adatok alapján!

  5. A lottosz.txt állományból beolvasott adatok alapján döntse el, hogy volt-e olyan szám, amit egyszer sem húztak ki az 51 hét alatt! A döntés eredményét (Van/Nincs) írja ki a képernyőre!

• #4958 timo92 csendes tag

  Új Válasz 2011-02-08 15:43:31 #4958

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  timo92

  csendes tag

  Sziasztok!
  Segítséget szeretnék kérni
  Van egy program amelyet nem tudok megcsinálni(pascalban)

  Adott az eredmeny.txt állomány (12
  1 2 3 1
  3 4 1 1
  1 4 2 0
  2 3 3 2
  1 3 2 2
  2 4 0 4
  2 1 1 1
  4 3 3 3
  4 1 3 4
  3 2 1 2
  3 1 1 0
  4 2 3 3) Az állomány első sorában található, hogy ezután mennyi mérkőzés eredménye található meg. Az egyes sorokban szóközökkel elválasztva az első, illetve második csapat sorszáma, majd az első csapat által lőtt gólok száma, végül a második csapat által lőtt gólok száma látható. PL: 1 2 2 0 (1: Első csapat) (2: Második csapat) (2: Első csapat 2 gólt lőtt) (0: Második csapat 0 gólt lőtt) határozd meg a bajnoki tabellát, azaz melyik csapat lett az első, ha a nyertes mérkőzésért 3 pont jár, a döntetlenért pedig 1. A végeredmény táblázatos formában jelenjen meg, amelynek a felépítése a következő: 1. Csapat sorszáma, Győzelmek száma, Döntetlenek száma, Vereségek száma, Adott gól-Kapott gól, Pontszám Pl: Hely Ssz. Gy. D. V. AG-KG P 1. 3 3 1 2 12-8 10p

  Tud nekem valaki segíteni???Megköszönném

Új hozzászólás Aktív témák