Verwijderde inhoud Toegevoegde inhoud
→Wiskunde: reactie |
Nieuw kopje aangemaakt: →Pythagorese drietallen. |
||
Regel 82:
::Met vriendelijke groeten, Wim Coenen. [[Gebruiker:Wim Coenen|Wim Coenen]] ([[Overleg gebruiker:Wim Coenen|overleg]]) 13 dec 2021 15:25 (CET)
:::Beste Wim, stel dat je een nieuw onderwerp in het kladblok wil toevoegen met als titel 'Nieuw onderwerp'. Je klikt dan eerst op 'Bewerken'. Daarna kan je naar beneden scrollen en helemaal onderaan aan het begin van een regel plaats je de tekst <nowiki>== Nieuw onderwerp ==</nowiki>. Daar onder kan je vervolgens de tekst invoegen die je daar wilt plaatsen. Voordat je klikt op 'Wijzigingen publiceren' kan je eerst met 'Toon bewerking ter controle' bekijken hoe het eruit ziet, en eventueel verder gaan met aanpassingen in de tekst. Groeten, [[Gebruiker:Bob.v.R|Bob.v.R]] ([[Overleg gebruiker:Bob.v.R#top|overleg]]) 13 dec 2021 18:42 (CET)
== Pythagorese drietallen. ==
Beste Bob,<br>
Misschien is het volgende leuk om uit te proberen.<br>
Ik heb een eenvoudige macro in Excel geschreven voor het genereren van Pythagorese drietallen.<br>
In mijn kladblok vind je onder de titel Pythagorese drietallen hoe ik aan de formules, die ik heb gebruikt, kom.<br>
Hieronder vind je de brontekst van de macro.<br>
Option Explicit
Sub generate()
Dim p As Integer
For p = 1 To 100
Cells(p, 1).Value = 2 * p
Cells(p, 2).Value = (p ^ 2 - 1)
Cells(p, 3).Value = (p ^ 2 + 1)
Cells(p, 4).Value = 2 * p + 1
Cells(p, 5).Value = 2 * p * (p + 1)
Cells(p, 6).Value = 2 * p * (p + 1) + 1
Next p
End Sub
<br>
Met vriendelijke groeten, Wim<br>
| |||