Prog.Hu
- programozás, szoftverfejlesztés, programozó állás, programozó
PC Fórum
- hardver, szoftver, windows, android, apple, google, táblagép, mobil, internet, iphone, samsung

Pascal problémák

5 éve
13
Eltelt idő számítási hiba - Tdatetime és datetostr probléma
Üdv! Nagyon egyszerű dolgot szeretnék megcsinálni: egy állandóan futó programnál szeretném megjeleníteni a system up-time -ot. (egy ipari pc-n fog menni, ipari alkalmazás, le lesz téve a gyártósorra). Ezt olyan egyszerűen gondoltam kezelni, hogy var initime, currtime : Tdatetime; FormCreate ev..
5 éve
1
Miért nem fut le dev-pascalban?
program kozuti_ellenorzes; type jarmu=record ora,perc,mdp:integer; rendszam:string[7]; end; var i,j,k,n,x,max,kul,imax,vizsgkezd:integer; t,f:text; a:array[1..500]of jarmu; kat:array[1..3]of integer; keres:string; ch:char; begin //1.feladat assign(t,'jarmu.txt'); reset(t); i:=0; while not eof(t) d..
- Pascal
5 éve
2
Folyamatábra
Program folyamatábrája kellene. A program forráskódja: program celloveszet; {2014.maj.ang.} var i,n,j,k,max,be,db,maxi:integer; t:text; sor:string[40]; lov:array[1..100] of string[40]; //4.feladathoz function loertek(sor:string):integer; var aktpont,ertek,i:integer; begin aktpont:=20; ertek:=0; fo..
5 éve
4
Pascal ABC rendezés.
A Feladat szövege: Az iskolában úgy döntöttek, hogy összevonnak két kisebb osztályt egy angolnyelvet tanuló csoportba. Mivel mindkét osztályból teljes létszámban jelentkezett mindenki, ezért a két osztály névsorából egy újabb ábécébe rendezett névsort kell alkotni az angolra. Írj programot, amely ..
- Pascal
- rendezés
5 éve
3
Tükörszám e az adott szám (Pascal nyelv)
Sziasztok! Van egy programom, ami bekér egy számot, tükörszámot csinál belőle és összeadja az eredeti számmal. ez lenne a forráskódja: var a, c, k, m, s, x, t, p, i, :integer; n:string; begin a := length(n); c:=0; k:=1; for m:=1 to a do begin val(n[m], x, t); c:=c+k*x; k :=k*10; end; val(n, p, t)..
5 éve
15
Számológép pascalban
Azt a feladatot kaptam, hogy írjam meg egy számológép alapprogjamját. Sikerült is írnom eggyet, de kiderült, hogy nem jó. Mert pl "3+6=" kifejezésre kellene kiírni a megoldást . Ki tudnátok javítani a programomat, vagy tanácsot adni? Mindenkinel kössz.
- Pascal
5 éve
13
TXT-ben lévő számok minimuma
Van egy txt fájl, amiben vannak számok. Meg kellene keresni a legkisebb számot és annak indexét. Tudnátok segíteni. Esetleg kijavítani? Előre is köszönöm.
- Pascal
- fájl
5 éve
6
Pascal:txt rendezése tetszőleges karakterek alapján
Sziasztok A következő a problémám: Van egy txt állományom amiben nevek és hozzájuk tartozó jegyek vannak Az lenne a feladat hogy rendezzem a txt-t a jegyek alapján A rendezés abc sorrendben már sikerült, viszont jegyek alapján nem for i:=2 to index_elso do for j:=index_elso downto i do ..
- Pascal
- rendezés
5 éve
25
Pascal nyelvben tükörszámok
Ez a feladatom: Tükörszámoknak nevezhetjük azon számokat, melyeket visszafele olvasva, az eredetivel megegyező alakot kapunk (pl.: 14541). Ilyen számot természetesen elég könnyű készíteni, vagy találni. Ennél érdekesebb, hogy nem tükörszámokat tükörszámokká alakíthatunk az alábbi módon. Fordítsuk ..
- Pascal
- forráskód
5 éve
8
Labirintus programozás
Készítsen programot, amely tetszőleges méretű labirintust generál egy fájlba. A labirintusban ne legyen kör! A bejárat és a kijárat lehet előre rögzített helyen.
- Pascal
- fájl
5 éve
6
Pascal - mohó algoritmus
Sziasztok! Van egy feladatom, amely nagyrészt már működőképes, de valami okból kifolyólag nem tökéletesen fut le, és már a hajam tépem ki, mert nem tudom, mi lehet a gond. Egy tesztoldal segítségével tudom ellenőrizni a megoldást, és minden esetre a darabszám megfelel, de bizonyos esetekben azzal..
- Pascal
5 éve
7
Ket szam osszeszorzasa pascal haromszog segitsegevel
Sziasztok, A kovetkezo problemaval kuszkodom es extra-szuper-duper halas lennek barkinek aki kozelebb tud vezetni hozza barmilyen otlettel. Adott: 3 operator: 1. \(n) -> 1 * 2 * 3 *4 * 5 * 6 * 7 * 8 * 9 * 10 * ..... * n (vagyis faktorialis) 2. /(n) -> 1+ 2+ 3+ 4 + .... + n (sorozat osszege 1 ...
- Pascal
- matematika
5 éve
20
Pascal: while ciklus probléma
A program lefut, de más más változók beolvasásakor hol jól működik, hol rosszul (pl.: ha 2 db 10-est írok be, akkor jó, viszont 5-tel már nem) var szam, osszege, szorzata, db: intger; begin osszege:=0; szorzata:=1; db:=0; szam:=1; while szam <> 0 do begin writeln('Szám: '); ..
- Pascal
- adatbázis
5 éve
2
Pascal (-) és ( + ) számok random generálása
Sziasztok! -100 és 100 közötti intervallumban kell random számokat generálnom. A baj az, hogy nem tudtam rájönni, hogyan generáljak egyszerre negatív és pozitív számokat (külön azt tudok, de nekem vegyesen kell, 10db ilyen számot kisorsolni). Előre is köszönöm a segítséget!
- Pascal
- Windows
5 éve
11
Pascal állománykezelés probléma
Sziasztok Mi a hiba az alábbi programban? var t: text; k: string; m: array[1..31] of string; i: integer; begin assign(t, 'nevek.txt'); reset(f); for i:=1 to 31 do begin readln(t,m[i]); writeln([m[i]); end; writeln('Add meg a keresett nevet!'); readln(k); f..
- Pascal
- Windows
5 éve
2
Flowgorithm pos függvény meghívása
Sziasztok! Flowgorithm-ben a pos függvényt szerettem volna meghívni, de rájöttem, hogy az nincs definiálva. Azért kellene ez a függvény, mert egy adott szövegben egy adott karaktert kell megkeresnem és úgy oldottam meg, hogy ha a pos függvény 1-et ad vissza (tehát az adott szövegben megtalálta a..
- Windows
- Pascal
5 éve
4
Ismeretlen kifejezések assembler toldalékban
Sziasztok! játékkészítés céljából jó volna a párhuzamos bill. kezelés melyhez tökéletes megoldásokat is találtam régebbi (2006-os) cikkek között, a problémám viszont a fordításával van. Uses Dos, Crt; VAR KBD : Array[0..127]Of Boolean; {Billentyűk állapotai, ScanCode szerint (pl.: KBD[1] az az ..
5 éve
3
Pascal mappa nevének ellenőrzése
Sziasztok az lenne a kérdésem, hogy meg lehet-e FPC-ben csinálni azt, hogy bekéri a szót és megnézi, hogy van-e olyan mappa. egy olyan programot írok amiben a felhasználóknak külön mappái vannak, és le kéne tesztelni, hogy van-e már ilyen nevű. A válaszokat előre is köszönöm!
5 éve
17
Összefuttató algoritmus probléma
Üdv! A következő algoritmust, "Az összefuttatás tétele" alapján csináltam, de exception keletkezik a futtatása során. (Egy Pascalban megvalósított program alapját másoltam le) public class App { public static void main(String[] args) { int[] A = {1, 2, 3, 4, 5}; int[] B = {2, 4, 5, 6, 7};..

abcd