Riješeno: SUBTRACT

Posljednje ažuriranje: 09/21/2023

Zaista, izvođenje indeksne aritmetike u COBOL-u ponekad može predstavljati izazov, ali ovaj izazov se može prevazići uz pravilno razumijevanje i znanje programskog jezika. COBOL, akronim za Common Business-Oriented Language, je programski jezik visokog nivoa za poslovne aplikacije. To je jezik koji se široko koristi u administrativnim sistemima za kompanije i vlade. Sada, hajde da zaronimo u rješenje problema i razložimo kod na način korak po korak.

Subscript Rješenje u COBOL-u

COBOL koristi nizove u obliku tabela za izvođenje indeksne aritmetike. Proces uključuje petlju kroz niz pomoću brojača ili indeksa, koji se često naziva subscript, za direktan pristup pojedinačnim elementima. Hajde da ispitamo jednostavan isječak koda za ovo:

01 PRODAJNA TABLICA.
05 PRODAJA-CIFKE SE DEŠAVA 100 PUTA SLIKA 9(5).
01 KORIŠĆENJE PRETPLATE JE INDEX.

ODSJEK ZA POSTUPAK.
PREMJEĆITE 1 NA PRETPLATANJE.

IZVRŠITE DO PRIJAVE > 100
DODAJTE PRODAJNE FIGURE (PRIJAVA)
PREMIJESTI PRETPLATU NA PRODAJU-UKUPNO.
DODAJTE 1 U PRETPLATA
END-PERFORM.

Objašnjenje Kodeksa

Naša SALES-TABLE koristi niz pod nazivom SALES-FIGURES koji se pojavljuje 100 puta i tip je PIC 9(5), što u suštini znači cijeli broj dužine do 5 znakova. Indeks ili indeks, SUBSCRIPT, kreiran je za ponavljanje kroz ovaj niz.

PROCEDURE DIVISION je mjesto gdje se nalazi stvarna logika programiranja. Ovdje inicijaliziramo SUBSCRIPT na 1.

Zatim se izvodi petlja sve dok SUBSCRIPT ne bude veći od 100. U svakoj iteraciji, dodaje se trenutna vrijednost SALES-FIGURES indeksiranih sa SUBSCRIPT, a kumulirani rezultat se pohranjuje u SALES-TOTAL. Nakon toga povećavamo SUBSCRIPT za jedan.

Povezane funkcije i biblioteke

Kada je u pitanju COBOL, OCCURS klauzula je neophodna za kreiranje nizova. Štaviše, operacija PERFORM UNTIL dozvoljava izvršavanje bloka koda sve dok se ne ispuni specificirani uslov.

INDEX Klauzula je takođe ključni instrument u COBOL-u za rad sa nizovima. Umjesto korištenja varijable kao brojača, klauzula INDEX omogućava efikasniji pristup pozicijama niza.

Što se tiče biblioteka, nema mnogo specifičnih za COBOL. Ovo je prvenstveno zbog starosti jezika i činjenice da je COBOL dizajniran da bude samostalan jezik, što znači da je potpuno moguće pisati pune aplikacije bez korištenja biblioteka trećih strana.

Sada, prelazeći na drugi aspekt diskusije, moda i njeni različiti stilovi i trendovi imaju bogatu istoriju proisteklu iz uticaja širom sveta.

Stilovi, izgled i trendovi na modnoj pisti

Moda je industrija koja se stalno razvija, koja neprestano izaziva vlastite tradicije i inspirira inovacije. Trendovi koji se stalno mijenjaju su ono što modu održava svježom i uzbudljivom.
Jedan od najdominantnijih trenutnih trendova je održiva i etička odjeća, koja odražava našu rastuću svijest o klimatskim promjenama i društvenoj nejednakosti.

Međutim, moda nadilazi odjeću koju nosite; to je oblik samoizražavanja i može simbolizirati kulturna kretanja. Na primjer, šezdesete su bile posebno poznate po živim bojama i psihodeličnim obrascima koji su stereotipni za hipi pokret. Ovaj stil je prenio dublje značenje, jer su predstavljali oslobođenje, mir i ljubav.

Anatomija oblačenja

Umjetnost odijevanja uključuje razumijevanje boja, linija, oblika i vašeg tijela. Zavisi od koncepta ličnog stila, poigravanja različitim siluetama i slojevitosti kako bi se postigao izgled koji je jedinstven za vas.
Osnova je razumjeti svoj tip tijela i istaknuti svoje prednosti. To se može postići kroz različite kombinacije odjevnih predmeta. Na primjer, ako imate figuru pješčanog sata, haljine koje se zatežu u struku laskale bi vašoj figuri.

Boja također igra značajnu ulogu u modi. Može drastično utjecati na raspoloženje odjeće, čineći je pogodnom za različite prilike. Na primjer, crna, crvena i zlatna često se povezuju sa formalnim događajima, dok pastelne boje označavaju ležerniju, opušteniju atmosferu.

Svi ovi suptilni faktori doprinose složenosti i ljepoti mode. Kako moda nastavlja da se razvija, razumijevanje njenih osnova postaje sve važnije, slično kodiranju u COBOL-u.

Slični postovi: