Kalkulator najvećeg zajedničkog faktora: 6 koraka

2024 Autor: John Day | [email protected]. Zadnja promjena: 2024-01-30 09:33

mnogi moji prijatelji i djeca koje podučavam imaju problema s pronalaženjem najvećeg zajedničkog faktora (HCF) od bilo koje hrpe brojeva. To je uglavnom zato što je obrazovanje u mojoj zemlji stvarno ispod standarda. djeca obično pribjegavaju učenju napamet i strogim pravilima.

U tom smislu stvorio sam program koji izračunava HCF.

iako se to zapravo ne može učiniti ručno, a postoje i lakši i jednostavniji načini za dobivanje HCF -a, osobno mislim da je ovo najprimitivnija, a time i najosnovnija tehnika. nadam se da će ljudi moći razumjeti prirodu HCF -a.

programski jezik na kojem ću danas pisati je Microsoft studio 2010 u načinu konzole

to je zato što nije osjetljiv na velika i mala slova te je vrlo prilagođen korisniku pa je savršen za nadobudnog početnika.

Korak 1: Korak 1: deklariranje varijabli

u bilo kojem programu kada želimo pohraniti bilo koji oblik podataka za manipulaciju moramo deklarirati varijable. Iako u mom programu postoji mnogo vrsta, koristio sam samo lokalne varijable.

sprema integralne varijable u format

Dim x kao cijeli broj

ova označava varijablu imenom "x" kao cjelokupni tip podataka

pa u programu moramo deklarirati ove varijable

Zatamni firstNum, secondNum, TEMP, HCF kao cijeli broj

u osnovi sam spremio varijable pod imenima: firstNum, secondNum, TEMP, HCF

Korak 2: Pohranjivanje varijabli

Nakon što smo proglasili varijablu, moramo joj dodijeliti vrijednost, inače je beskorisna.

za to koristimo operator "="

ali da bismo ga pročitali od korisnika potreban nam je način da ga unesemo. koristimo funkciju "Console. ReadLine"

ovo je funkcija konzolnog moda visual basic -a koja čita redak upisan u konzolu

program ide ovako;

firstNum = Konzola. ReadLine

onda radimo isto sa sljedećom varijablom

secondNum = Konzola. ReadLine

ovo sprema dva broja za manipulaciju od strane programa

Korak 3: Usporedba

zatim uspoređujemo dvije varijable i provjeravamo koja je manja. mogli bismo koristiti i veći broj, ali bilo bi beskorisno preopteretiti program. ali ako su obje varijable jednake možemo koristiti bilo koju

za usporedbu koristimo naredbe if

Ako je uvjet Then (radnja ako je uvjet istinit)

U drugom slučaju

(radnja ako je uvjet istinit)

Završi ako

pa zapravo izgleda ovako

Ako firstNum <secondNum Zatim TEMP = firstNum OstaloIf firstNum> secondNum Zatim TEMP = secondNum

OstaloAko firstNum = secondNum Zatim

TEMP = drugiBr

Završi ako

Korak 4: Pronalaženje HCF -a

u teoriji HCF je najviši cijeli broj kojim se svi navedeni brojevi mogu pojedinačno podijeliti bez ostavljanja ostatka. ili u smislu računala ostatak nule

u svom programu nastavljam dijeliti brojeve i povećavati ih sve dok ne dobijem najveći mogući cijeli broj koji dijeli sve brojeve bez ostavljanja ostatka.

za ovo ću koristiti "za iteracijsku petlju"

sintaksa glasi:

Za i = (bilo koji broj) do (bilo koji broj) korak (inkrementalni broj)

(funkcija)

Sljedeći

budući da ne mogu podijeliti s 0 morat ću početi od 1 pa do najmanjeg broja. to je zato što HCF ne može biti veći od bilo kojeg broja. ako se sjećate da smo najmanji broj spremili u varijablu 'TEMP'.

za usporedbu brojeva upotrijebit ćemo if naredbu.

za ovaj ćemo zadatak također koristiti poseban operator koji se zove operator modula

ovo vraća ostatak od podjele

njegova sintaksa je

(broj) mod (djelitelj)

u drugim programskim jezicima, npr. C ++, mod se može zamijeniti znakom postotka '%'

pa za naš program pišemo

Za i = 1 do TEMP -a Korak 1

Ako je ((firstNum Mod i = 0) And (secondNum Mod i = 0)) Tada

HCF = i

Završi ako je sljedeće

spremamo brojeve u varijablu "HCF" svaki put kada se pronađe veća varijabla HCF se prepisuje

ako i ako faktor oba broja tada se pohranjuje u varijablu HCF

Korak 5: Prikaz rezultata

za prikaz rezultata na zaslonu konzole koristimo naredbu "console.write ()" ili "console.writeline ()"

važno pravilo je da napisane riječi moraju biti zatvorene u apostrofe (""). Varijable nije potrebno stavljati u apostrofe

također se možemo poslužiti operatorom "&" za spajanje redaka, ne zaboravite postaviti razmak s obje strane & simbola

tako ide program

Console. WriteLine ("Najviši zajednički faktor je" & HCF)

Nažalost, računalo obično ne čeka korisnika ako mu se ne kaže. pa dodajemo još jedan redak programa kako bi korisnik mogao pročitati rezultat.

Console. WriteLine ("Pritisnite bilo koju tipku za izlaz")

Console. ReadKey ()

Korak 6: Lakoće

ovo je moja verzija programiranja s komentarima za pomoć.

Modul Modul 1 Sub Main ()

'u bilo kojem programu moramo deklarirati varijable

Dim firstNum, secondNum, TEMP, HCF As Integer '"As Integer" simbolizira da su priroda podataka za ove varijable cijeli brojevi

'prvo obavijestimo korisnika o uputama

Console. WriteLine ("unesite dva broja za najveći zajednički faktor") ', a zatim tražimo od korisnika da unese broj Console. WriteLine ("unesite prvi broj") "pohranjujemo znamenku u varijablu firstNum firstNum = Console. ReadLine' tada tražimo od korisnika da unese drugi broj Console. WriteLine ("unesite drugi broj") 'slično čuvamo i to, ali u drugoj varijabli' ne želimo da se prva prepiše secondNum = Console. ReadLine

'uspoređujemo koji je veći i pohranjujemo ga u privremenu memoriju "TEMP"

Ako firstNum secondNum Tada je TEMP = secondNum

'u klauzuli ispod spremili smo vrijednost u TEMP iako su prvi i drugi broj bili jednaki

'To je zato što nam je trebao "najveći" broj od bilo čega što god to bilo.

OstaloAko firstNum = secondNum Zatim

TEMP = secondNum End Ako

'Ovdje programiranje zaista počinje

"funkcija mod dijeli cijeli broj s brojem i vraća ostatak" to je korisno, na ovaj način možemo provjeriti po kojim su brojevima ostaci nula

'ovdje koristimo "FOR ITERATION LOOP" za obavljanje posla

'stvaramo varijablu' i 'i povećavamo je za 1 nakon svake petlje

Za i = 1 To TEMP Korak 1 '"Korak 1" pokazuje da postoji povećanje od 1 nakon svake petlje

'kao što vidite koristili smo i funkciju AND

'To je zato što su nam bili potrebni samo brojevi koji dijele obje varijable dajući ostatak nule

'Još jedna važna napomena je da ne možemo početi s 0

'To je zato što sve podijeljeno s 0 može dovesti do beskonačnosti Ako ((prviNum Mod i = 0) I (drugiNum Mod i = 0)) Tada

'pohranjujemo brojeve u varijablu "HCF"

'svaki put kad se pronađe veća varijabla HCF se prepisuje HCF = i End If Next

Console. Clear () 'ova naredba briše sve napisano na ekranu konzole

Console. WriteLine ("najveći zajednički faktor =" & HCF) 'ova naredba prikazuje poruku na ekranu konzole

'naredbe ispod omogućuju izlaz iz zaslona konzole

Console. WriteLine () Console. WriteLine ("Pritisnite bilo koju tipku za izlaz") Console. ReadKey ()

'P. S

'tijekom programiranja, sve dok ne uništite sintakse', možete staviti razmake, kartice ili prazne retke kako bi program izgledao manje neuredno

Kraj podm

Završni modul