Aan de TH (later TU) Eindhoven programmeerden we begin jaren zeventig in Algol 60, op de Burroughs B 6700-computer.
Interessant te melden is dat wat betreft het onderwijs in de numerieke wiskunde in...
Type: Posts; User: Anant; Keyword(s):
Aan de TH (later TU) Eindhoven programmeerden we begin jaren zeventig in Algol 60, op de Burroughs B 6700-computer.
Interessant te melden is dat wat betreft het onderwijs in de numerieke wiskunde in...
https://tweakers.net/nieuws/217146/pascal-bedenker-en-programmeertaalpionier-niklaus-wirth-is-overleden.html
De functies BerekenAzi en BerekenHoogte hebben als inputvariabele de Uurhoek, dat is de hoek tussen de Rechte Klimming van het hemellichaam en die van de Meridiaan:...
function PtInEllipse(const Rect: TRect; const P: TPoint): Boolean;
var
a, b: Integer;
center: TPoint;
begin
// algemene vergelijking van een ellips met center in (0,0)
// x^2/a^2 +...
Nee hoor!
Normaal gesproken behoeven retorische vragen geen antwoord (want bij de vragensteller al bekend) maar ik maak toch graag een uitzondering op de regel.
Ik meende het oprecht wat ik...
Op zichzelf een prachtig verhaal! Spannende wendingen, hilarische kwesties... boeiend geschreven!
Een build creëert inderdaad nu een executable. Het 'runnen' in de IDE gaat nog niet vlekkeloos. Ik kom er wel uit nu. Dank voor het meekijken! :)
De release-map wordt itt de debug-map niet (automatisch) aangemaakt merk ik. Handmatig gedaan, de .dll erin gezet, maar krijg nu een AV...
---------------------------
Vulcanus.exe - Systeemfout
---------------------------
De code-uitvoering kan niet worden voortgezet omdat swedll32.dll niet is gevonden. U kunt dit probleem mogelijk...
N.a.v. van deze topic dacht ik: laat ik die release-configuration ook eens uitproberen
Maar als ik de code vervolgens compileer krijg ik de melding:
---------------------------
Vulcanus.exe -...
Ik zie jouw post nu pas Marcov. Ik denk ongeveer conform jouw suggestie al gehandeld te hebben, zie hierboven...:rolleyes:
Dank voor de moeite!
Ik denk de oplossing gevonden te hebben, door de verwijzing naar het label te interpreteren als een subroutine waarbij de variabele i niet deelneemt aan de for-nextloop doorloopt en ook niet het hele...
Dit was ook mijn (Delphi-)interpretatie, maar het leverde niet steeds dezelfde uitkomsten op vergeleken met de VB3-uitvoer.
Zie ook mijn antwoord hierboven.
Nee, de verschillen in uitvoer hebben niets te maken met decimale digits in de verkregen uitkomsten. Een aantal grenswaarden die het algoritme oplevert in de VB3-gedaante verschillen wezenlijk van...
Het gaat niet zo zeer om de reproduceerbaarheid van de code (ik heb hem ook slechts als een pseudo-exemplaar gepresenteerd), maar om de vraag hoe ik een label binnen een for-nextloop in VB zou moeten...
Ik kan je zeggen dat ik het hele algoritme, waar dit stukje onderdeel van uit maakt, al 'nagemaakt' heb in Delphi. Daarbij heb ik deze en andere GOTO's uiteraard vervangen door aanroepen naar...
Ik wil een vertaling maken naar Pascal/Delphi van een stuk code geschreven in Visual Basic 3.
Ik stuit op het volgende:
(pseudocode)
DHAlign: //aangeroepen elders in het programma
for i =...
programmeren is moeilijker als je denkt :D
:D
{ // (* 1 + 1 = b *) }
Met 'valse vergelijking' doelde ik niet op het evalueren van een waarde, zoals in if a = 5 (pascal) of a == 5 (c++), (m.b.v. de equal-to operator dus), maar op de wiskundige vergelijking a = a + 1...
Hm, ik zou moeite hebben met a = a + 1 dat het uiterlijk heeft van een 'valse vergelijking'...
Het veel elegantere a := a + 1 lees ik in gedachten steevast door mijn oude Algol-bril: a wordt a +...
Nou zeg, dat is nog eens een ouwe thread uit de sloot halen! Aangezien ik hierop nog steeds een geldig abonnement blijk te hebben, maar ook vanwege mijn eerdere bijdrage in de vorm van pascalcode in...
Betekent dit dat na elk jaar wordt geëvalueerd of je nog aan de voorwaarden voldoet? Of is het gewoon shareware?
procedure TForm1.DoShowHint(var HintStr: String; var CanShow: Boolean; var HintInfo: THintInfo);
begin
if HintInfo.HintControl = button1 then
begin
with HintInfo do
begin
...
Dat is een opmerkelijke uitlating van de pionier van deze site...:confused::)