#12 Mircosoft
hm..polia...tie sa ešte nebrali....
ale evidujem ako elegantnejšie riešenie tejto časti....
možno ak sa budú brať, tak sa to ukáže aj týmto spôsobom...
#8 Mircosoft
hm, tiež ma to napadlo,tak som už začala..ale neviem, čo takto je to ok... a potom výpis? a ešte cez If ošetriť tie intervaly zverokruhu?
case mesiac of
1: begin
x:=31;
pocet:=den+x;
end;
2: begin
x:=31+28;
pocet:=den+x;
end;
3: begin
x:=2.31+28;
pocet:=den+x;
end;
4:begin
#6 Mircosoft
hm...takže sa to tak dá aj "oficiálne":-) teda volá sa to "fixed point"...budem si to pamatať...intuitívne som si myslela, či by som to akože tak "neoklamala", že by som to prehodila na integer a tie vyhodnotila...
ďakujem
ten druhý mi ale nebeži cez case...
takto to asi nepojde, že?
var den, mesiac: integer;
begin
writeln (' Zadaj den a mesiac narodenia ako cele cislo');
readln(den, mesiac);
case mesiac of
1..2: begin
If (den>=21 and den<=29) and (den >=1 and den <=19)
then writeln (' si znamenie vodnar');
end;
2..3: begin
If (den>=20 and den<=30) and (den >=1 and den <=20)
then writeln (' si znamenie ryby');
end;
end;
end.
#2 KIIV
Vďaka, viem, že real nemôžem použiť v CASE...
a asi to budem musieť obíjsť... Chcela som cez case riešiť, aby sa vypísalo či mám normálnu váhu, nadvahu...a ďalej bla bla bla...ak vypočítam BMI index ako podiel hmotnosťi a druhej mocniny výšky v metroch... tie intervaly sú tam Od 18,5 do 30..a tak nejak... hm?
2. napadlo ma pole, ale to ešte nemôžem použiť... tak to skúsim poroešiť a môžem potom poslať zdriják? Na kontrolu efektívnosti, resp. ak nebudem vedieť zlepiť?
Vďaka veľká!!!
#1 Student
zdravím,
môžte mi prosím poradiť?
1.úlohu riešiť pomocou case v pascale ak mám výraz real a hodnoty (intervaly ohraničené desatinným číslom)?
2. úloha, mám použiť case ak chcem aby mi po načítaní dátumu vypísalo aké som znamenie? teda aj deň aj mesiac rozhoduje.
ďakujem, už včera bolo neskoro