PAscal programma

[eriksu2]

Labdien! man ir jāizveido programma pascal , kura aprēķina rinķa līnijas garumu vai riņķa laukumu.. tos esmu izdarījis, bet nerzinu kā uztaisīti, piem. kad ieraksta negatīvu rādiusu, lai parāda ka risinājuma nav vai ka negativs negrib būt, tas parāda risinājumu pozitīvu

”

Uses crt;

var radiuss,result:real;

var izvelne:string;

begin

Writeln(‘Ievadi rinka linijas radiusu!’);

readln (radiuss);

writeln (‘Ko rekinat? L – Laukumu, G – Garumu’);

Readln (izvelne);

If radiuss<0 then

Writeln (‘Risinajuma nav’);

If izvelne = ‘L’ then

begin

result := pi*radiuss*radiuss;

writeln (‘Laukums ir ‘,result:2:2,’cm^2’);

end;

If izvelne = ‘G’ then

begin

result := 2*pi*radiuss;

writeln (‘Garums ir ‘,result:2:2,’cm’);

end;

readln;

end.

”

īSak sakot lai kad ieraksta rādiusa vietā burtus, simbolus vai negatīvu, lai uzraksta ka nepareizi

[mazais_zilonis]

vienkāršākais –

if negadīvs tad izdrukāt

else rēķināt

[Crow]

If radiuss<0 then

Writeln (‘Risinajuma nav’)

ELSE

begin

If izvelne = ‘L’ then

begin

// blablabla

end

ELSE

If izvelne = ‘G’ then

begin

// blablabla

end

end

P.S. un vispār… nākamreiz, kad kaut ko prasi – uzraksti to, ko tev vajag, saprotamā valodā, ar pieturzīmēm, garumzīmēm. Vispār gribējās tevi pasūtīt iet taisni…

[eriksu2]

to crow : tad tevi arī ar līkumu jāsūta? ir gan garumzīmes, gan pieturzīmes !

[Crow]

Labdien! Man ir jāizveido programma Pascal_, kura aprēķina riņķa līnijas garumu vai riņķa laukumu… tos esmu izdarījis, bet nerzinu, kā uztaisīti, piem., kad ieraksta negatīvu rādiusu, lai parāda, ka risinājuma nav, vai, ka negatīvs negrib būt, tas parāda risinājumu pozitīvu.

ka negatīvs negrib būt, tas parāda risinājumu pozitīvu O_O

Diagnoze: taurs

[eriksu2]

tev varbūt par skolotāju tad jāiet ,ne? Ja esi tik acīgs?

[deivs001]

Eriksu2, varbūt labāk apskaties uz savāk kļūdām un pasaki paldies, ka tev palīdzēja. Ne izliecies par ūberkadru, kas prot visu un visi vienmēr pārmet tikai kļūdas. Crow izlaboja tavu tekstu, jo tu jau uzstāji, ka esi salicis visas vajadzīgās pieturzīmes un garumzīmes.

[eriksu2]

Paldies! 🙂

nelecos vienkārši atbildēju 🙂

Ar šo mīnusu sapratu arī pielaboju pēc vajadzības, bet skolā mēģināju uztaisīt vēl, lai tad ja ievada nepareizo burtu tur kur izteikts garums G vai laukums L, ja ievada kādu citu burtu tad lai parāda ka apzīmējums nav pareizs.. izmēģināju : If (r=’q’) (r=’w”) .. writeln (‘burts nav pareizi izteikts’) tā visus liekos burtus izņemot G un L bet nesanāca..

Varbūt kāds zina arī šo iespēju.

[ob1]

Kopš kura laika rādiuss nevar būt negatīvs? Atkal skolotāji izvaro skolēnu smadzenes…

Autoram – lūdzu nodod skolotājam ziņu no ob1:

“Tu, nedajātais loh, netuvojies skolai tuvāk kā kilometra rādiusā!”

[nevertell]

Fiziski nekas nevar būt negatīvs, pēc teorijas gan. Spēki jau ar nav negatīvi, tikai pretēji vērsti.

[Crow]

Vienkārši izstudē IF-THEN-ELSE konstrukcijas. Tās var likt vienu iekš otras līdz bezjēdzībai. Var arī kabināt beigās.

Quote:

If radiuss<0 then

Writeln (‘Risinajuma nav’)

ELSE

begin

If izvelne = ‘L’ then

begin

// blablabla

end

ELSE

If izvelne = ‘G’ then

begin

// blablabla

end

ELSE

Writeln (‘Nepareizs burts mlje!’);

end;

P.S. Cik nu es sajēdzu, algebrā rādiuss var būt negatīvs. Ä¢eometrijā nē. Bet man matemātikā švaki… ak nu jā, nevertell jau pateica 🙁

P.S.S. Ar atkāpēm labāk varētu parādīt, kā tas darbojās, bet galu galā tam domāti mācību materiāli.

[ob1]

Nabadziņi… jūs arī skolotāja vietā lohi mācīja?

[nevertell]

tvaju maķ, cik šon noutpeds bugains.

[nevertell]

Tad nāc izmāci mūs, māster obī van kenŠbī.

[ob1]

Matemātika, bērni, ir zinātnes valoda. Un, ja matemātika saka, ka var, tad var.

Patiesībā matemātika ir reālitāte, nevis mūsu iztēle (ka rādiuss nevar būt negatīvs).

Matemātikā nav pretrunas. Ä¢eometrija nav (un nekad nebūs) pretrunā ar algebru. Matemātika ir skaista, vienota celtne, tajā nav vietas dogmām (kā reliģijā).

Jebkurš dogmatisms matemātikas celtni padara šķību – un galu galā tā sabrūk… un, tas, ka skolā mēģina mācīt matemātiku ar dogmām… tā vairs nav matemātika… un paliek sarežģīta un neinteresanta.

Kas attiecas uz negatīvo rādiusu… mēģinājums paskaidrot vienkāršā valodā atrodams šeit:

https://answers.yahoo.com/question/index?qid=20080814025918AAcbYGv

lai gan patiesība ir daudz vienkāršāka, bet to grūti izprast ar dogmatisku domāšanu.

Free your mind – tas nozīmē “izmet dogmas no savām smadzenēm”. Jo ar dogmām matemātika no skaista, vienkārša grafa pārvēršas par smagu, nerisināmu lineārās programmēšanas uzdevumu ar dauuuuudz nevienādībām…

Hmm, atcerējos vecu džedaju parunu – ja tava krāna izmērs ir negatīvs… nu, tad tu droši vien esi sieviete.

🙂

[eriksu2]

āā ar ELSE jāpieliek.. paldies sapratu..

Par to negatīvo rādiusu, jā protmas ka nevar būt, bet ja programmā ievadi negatīvu, piemēram -10, tad programma uzprasa ko rēķināt paņemam piem. L un tad programma parāda, ka Laukums ir Pi*r*r= ~300 cm^2

[Autors]

Ieraksti