2.1. Užduotis:
Žinome klasės mokinių gimimo datas (metai, mėnuo, diena). Rasti vyriausią mokinį ir atspausdinti, kiek dienų jis jau pragyveno. Skaičiavimo momento metus, mėnesį ir dieną įvesti klaviatūra (arba paimti kompiuterio datą). Parašyti funkciją, skaičiuojančią mokinio amžių dienomis. Pageidautina įvertinti keliamuosius metus.
Žinome klasės mokinių gimimo datas (metai, mėnuo, diena). Rasti vyriausią mokinį ir atspausdinti, kiek dienų jis jau pragyveno. Skaičiavimo momento metus, mėnesį ir dieną įvesti klaviatūra (arba paimti kompiuterio datą). Parašyti funkciją, skaičiuojančią mokinio amžių dienomis. Pageidautina įvertinti keliamuosius metus.
Pradžia: Vyriausio mokinio amžiaus skaičiavimas dienomis.
Įvesti mokinių skaičių n.
Įvesti mokinio gimimo datą min.
mokNr := 2, n
Įvesti kito mokinio datą mokData.
xxx:= Vyr(mokData,min);
Kreipiamasi į funkciją Vyr vyriausio mokinio paieškai.
T\ mokData < min /N
min := mokData;
Vyr := min;
min:= xxx;
Surastas skaičius suskaidomas į datos elementus.
Išvedami vyriausio mokinio datos elementai.
Išvedama kompiuterio dabartinė data.
Skirtingomis sąlygomis skaičiuos dienų, mėnesių metų skirtumus.
T\ dien >= dienM ir men >= menM /N
skirtum := dien - dienM;
skirtumMen := men - menM;
skirtumMet := met – metM;
T\ dien >= dienM ir men <= menM /N
skirtum := dien - dienM;
skirtumMen := (men + 12) - menM;
skirtumMet := Pred (met) – metM;
T\ dien <= dienM ir men >= menM /N
B := Pred (men);
MenesioDien (A, B, C);
skirtum := (dien + C) - dienM;
skirtumMen := B - menM;
skirtumMet := met - metM;
T\ dien <= dienM ir men <= menM /N
B := Pred (men);
MenesioDien (A, B, C);
skirtum := (dien + C) - dienM;
skirtumMen := (B + 12) - menM;
skirtumMet := Pred (met) - metM;
Išves, koks vyriausio mokinio amžius, nurodant metus, mėnesius, dienas.
Skaičiuos keliamųjų metų, kuriuos pragyveno mokinys, kiekį k.
k := 0
g := metM, met
T\ g mod 400 = 0 /N
k := k + 1;
T\ g mod 100 = 0 /N
k := k;
T\ g mod 4 = 0 /N
k := k + 1;
k := k;
Susumuos mėnesių dienas.
sum := 0;
i := 1, skirtumMen
MenesioDien (metai,i,dienos);
sum := sum + dienos;
sum := skirtum + sum + (skirtumMet * 365)+ k;
Išvesti rezultatą sum.
Pabaiga
2.3. Programos tekstas
// L3-6. Žinome klasės mokinių gimimo datas (metai, mėnuo, diena). Rasti vyriausią mokinį ir
// atspausdinti, kiek dienų jis jau pragyveno. Skaičiavimo momento metus, mėnesį ir dieną
// įvesti klaviatūra (arba paimti kompiuterio...
Šį darbą sudaro 1129 žodžiai, tikrai rasi tai, ko ieškai!
★ Klientai rekomenduoja
Šį rašto darbą rekomenduoja mūsų klientai. Ką tai reiškia?
Mūsų svetainėje pateikiama dešimtys tūkstančių skirtingų rašto darbų, kuriuos įkėlė daugybė moksleivių ir studentų su skirtingais gabumais. Būtent šis rašto darbas yra patikrintas specialistų ir rekomenduojamas kitų klientų, kurie po atsisiuntimo įvertino šį mokslo darbą teigiamai. Todėl galite būti tikri, kad šis pasirinkimas geriausias!
Norint atsisiųsti šį darbą spausk ☞ Peržiūrėti darbą mygtuką!
Mūsų mokslo darbų bazėje yra daugybė įvairių mokslo darbų, todėl tikrai atrasi sau tinkamą!
Panašūs darbai
Atsisiuntei rašto darbą ir neradai jame reikalingos informacijos? Pakeisime jį kitu nemokamai.
Pirkdamas daugiau nei vieną darbą, nuo sekančių darbų gausi 25% nuolaidą.
Išsirink norimus rašto darbus ir gauk juos akimirksniu po sėkmingo apmokėjimo!