| | |
| Stránka: 1 z 1
| [ Príspevkov: 4 ] | |
Autor | Správa |
---|
Registrovaný: 29.09.11 Prihlásený: 11.03.16 Príspevky: 170 Témy: 21 Bydlisko: Trenčín |
Dobry den
mam taky problem, potrebujem pracovat s Pascalom na Windowse 7 64 bit
viem ze existuje riesenie nainstalovat DOSBox a do toho supnut Turbo Pascal
Neexistuje vsak nejaky program ktory by fungoval aj bez instalacie toho DOSBoxu? Netreba mi nutne Turbo Pascal ale len nieco podobne, v com budu programy .pas... fungovat a dat sa pisat
Mam aj Delphi, neda sa nahodou tam spustit/pisat pascalovy program?
Predom dakujem
Vych
|
|
Registrovaný: 21.12.06 Prihlásený: 31.12.19 Príspevky: 9438 Témy: 95 |
ja osobne som pouzival Dosbox - je to lahke. Ale mozes pouzivat aj objektovy pascal Delphi/Lazarus.
_________________ NB: ACER Aspire TimeLineX 3820TG: i5-460M; ATI HD5650; 4GB DDR3; HDD 640GB; OS: Win7 64bit + Taška: Zeroshock 3; USB Hub: aktiv Belkin 4port - USB2
Myš: MS laser mouse 6000; Headset: Logitech Digital Precision PC Gaming; Klávesnica: Logitech 200; USB key: Patriot SUPERSONIC USB3 - 32GB ; Mobil: SE Xperia Neo V
Repro:Bach 2.0; Tlač:HP 1410, 1315, 3330-kopírka |
|
Registrovaný: 29.09.11 Prihlásený: 11.03.16 Príspevky: 170 Témy: 21 Bydlisko: Trenčín |
ale predsa v delphi sa neda spustit pascalovy program nie?
// pridané po 6 minútach od posledného príspevku
mam totiz program
Program Rok_Mesiac_Den_Hodina;
uses DOS,CRT;
var d,m,r,por:word;
pdm,dkm:byte;
dkr:integer;
priestupny:boolean;
begin
clrscr;
getdate(r,m,d,por);
write('Dnes je ');
case por of
0:write('Nedela');
1:write('Pondelok');
2:write('Utorok');
3:write('Streda');
4:write('Stvrtok');
5:write('Piatok');
6:write('Sobota');
end;
writeln(' ',d,'.',m,'.',r,'.');
writeln;
priestupny:=(r mod 4 = 0) and ((r mod 100 <> 0) or (r mod 400 = 0));
case m of
1,3,5,7,8,10,12:pdm:=31;
2:if priestupny
then pdm:=29
else pdm:=28;
4,6,9,11:pdm:=30;
end;
dkm:=pdm-d;
write('Do konca mesiaca ');
case dkm of
1:writeln('zostava 1 den');
2,3,4:writeln('zostavaju ',dkm,' dni');
else writeln('zostava ',dkm,' dnii');
end;
readln;
end.
2x nan kliknem zapne sa delphi
ale tlacitko spustit je zasedle
|
|
Registrovaný: 23.12.10 Prihlásený: 10.09.22 Príspevky: 1056 Témy: 157 Bydlisko: KK/PP/BA | Napísal F3RY: 12.02.2012 19:26 | |
|
Stiahni si free pascal 64bit a mas po probleme. Kod patri do code!
_________________ HP ProBook 4530s Intel® Core™ i5-2430M (2.4GHz, 3MB, 2 jadrá)*4GB 1333MHz DDR3*ATI Mobility Radeon HD 6490 1GB + Intel HD Graphics 3000*640GB SATA 5400RPM *Windows 7 Home Premium 64 bitová verzia Lenovo IdeaPad Z50-70 Intel Core i5 4210 Haswell* NVIDIA GeForce GT 840M 4GB + Intel HD Graphics 4000*SSHD 1TB 5400 otáčok + 8GB cache*RAM 4GB* Full HD (1920 × 1080)*Windows 10 pro
Boh je reálny, pokial nebol deklarovaný ako integer |
|
| Stránka: 1 z 1
| [ Príspevkov: 4 ] | |
| Nemôžete zakladať nové témy v tomto fóre Nemôžete odpovedať na témy v tomto fóre Nemôžete upravovať svoje príspevky v tomto fóre Nemôžete mazať svoje príspevky v tomto fóre
|
|