Navigacija

Vartotojų tinkle

Prisijungusių svečių: 530
Prisijungusių narių: 0
Prisijungusių narių nėra

Registruoti nariai: 25,956
Naujausias narys: saulyzas

Naujausi straipsniai

Paskutiniai nariai

saulyzas 6 dienos
MaFetas 1 savaitė
TOMIJUS 2 savaitės
ozzWANTED 2 savaitės
Reikalas11 savaitės
Jaunelis17 savaitės
lanis17 savaitės
And2s18 savaitės
Memento Mori23 savaitės
Quwqkibor25 savaitės
asirija29 savaitės
tomeem31 savaitės
weberiz35 savaitės
mRokass37 savaitės
kartoonas38 savaitės
grunskiz41 savaitės
Bruksnys41 savaitės
illusion41 savaitės
ordo42 savaitės
Jurgaila43 savaitės

Informacija:


OS: Unknown
Naršyklė: Nežinoma
IP: 3.149.29.98
Naujienų: 529
Straipsnių: 235
Temų: 52,588
Postų: 522,537
Postų pask. parą: 0
Shout'ų pask. parą: 0
P.S.C. pask. parą: 0
Nuorodų kataloge: 13

Lankomumo Statistika

Peržiūrų šiandien: 22

Iš viso peržiūrų: 22948724

Prisijungti

REGISTRUOTIS
Nario vardas

Slaptažodis



Pamiršai slaptažodį?
Paprašyk naujo

Aktyvuoti save

Šaukykla

Jei norite rašyti žinutes, turite prisijungti.

MaFetas
2024 Lap. 13 22:11:57
hey how, geras dar veikiantis saitas?

Jaunelis
2024 Lie. 25 11:07:43
Oho vis dar veikia svetainė akinanti šypsen Šimtas metų, matau Šaukykloje nuostalgija. Smagu panaršyt po forumą ir pažiūrėt senas temas šypsosi

And2s
2024 Lie. 17 19:07:04
2008 pirmą kart čia patekau, man buvo 10m ir čia pramokau programavimo.. smagu skaityti senas žinutes, tokia nostalgija akinanti šypsen ačiū Ozz kad saugoji šitą kultūrinį reliktą šypsosi

ozzWANTED
2024 Sau. 17 01:01:00
Desperatiškus komentarus šaukykloje su accountu po mėnesio prasibuvimo, ištryniau. Pasaulis ir taip juodas. Įjungiam šviesą, prašviesės. šypsosi

Majakas
2023 Gru. 10 19:12:39
Negaliu patikėti jog žinutės/pranešimai visi yra nuo 2008 m akinanti šypsen

Šaukyklos archyvas

Apklausa

Ar esate patenkinti lietuviško vertimo kokybe?

Taip!

Taip, bet yra ką taisyti (parašysiu komentaruose)

Ne

Norėdamas balsuoti turite prisijungti.
Archyvas
Reklama 400x60
Pascal: eZkimo klausimai
Forumas | PHP-Fusion, WordPress, Shopify, PHP ir MySQL (PROGRAMAVIMAS) | C#, Python, Java, JS, C++ klausimai

Autorius: altenis Peržiūrų: 1693      Spausdinti temą
2011 Kov. 27 20:03:52          1 žinutė iš 4
Spausdinti pranešimą
Sveiki,
Taigi pradėjau savarankiškai mokytis Pascal, ir čia užduosiu klausimus į kuriuos tikiuosi Jūs atsakysite ir padėsite man.
Tai vat įrašiau šį kodą:

program Funkcijos;
uses Math;
var z,x0:integer;
 
// I pvz.
function Funkcija : integer;
Begin
Funkcija := 5;
end;
 
// II pvz.
function Sim(a:char) : integer;
Begin
Sim:= Ord(a);
end;
 
// III pvz. Rasti funkcijos F(x) = x + 2 * x - sinx reiksme taske x0 = 1
function F(x:integer) :real;
Begin
F:= x + 2 * x - sin(x);
end;
 
begin
// I pvz.
z:= Funkcija + 7;
Writeln(z:4);
 
// II pvz.
Writeln('Simbolio a kodas: ', Sim('a'));
 
// III pvz.
x0 := 1
Writeln('Funkcijos reiksme: ', F(x):4:2);
Readln;
end.


Ir man rodo klaidą 3 pavyzdyje. Šioje eilutėje:

Writeln('Funkcijos reiksme: ', F(x):4:2);


Niekaip nesuprantu kas čia blogai.
2011 Kov. 27 22:03:24          2 žinutė iš 4
Spausdinti pranešimą
gal dėl to, kad ant
x0 := 1 neuždėjau ; ?
2011 Kov. 28 03:03:15          3 žinutė iš 4
Spausdinti pranešimą
Turi visur uždėti ; po eilutės. Sintax errorų daryt negalima

BR#1, Most Wanted
2011 Geg. 29 10:05:52          4 žinutė iš 4
Spausdinti pranešimą
Eilutėje prieš end nebūtina dėti ; , bet dabar tai reikia šypsosi, ";" šitą ženklą reikia dėti esant dar vienai eilutėj po jos. O jeigu po jos eilutė end. tai nebereikia dėti, o jei padėsi irgi nieko blogo tik programa supras dar vieną tuščią eilutę.
Peršokti į forumą: