Difference between revisions of "Ro/Rodin/Alte exemple"
< Ro/Rodin
Jump to navigation
Jump to search
m (Ather example in test) |
m (Ather example in test) |
||
Line 1: | Line 1: | ||
Program incercat in timpul testarii RodinV082b. |
Program incercat in timpul testarii RodinV082b. |
||
Se observa cateva probleme. |
Se observa cateva probleme. |
||
+ | <haskell> |
||
− | |||
{ text "Dati lungimea vectorului"; |
{ text "Dati lungimea vectorului"; |
||
Line 41: | Line 41: | ||
}; |
}; |
||
+ | </haskell> |
||
− | |||
Beta tester: Cristina (88). Multumesc mult pentru exemplu. |
Beta tester: Cristina (88). Multumesc mult pentru exemplu. |
Revision as of 05:32, 25 November 2008
Program incercat in timpul testarii RodinV082b. Se observa cateva probleme.
{ text "Dati lungimea vectorului";
citeste n;
pentru (fie x=0; x<n; fie x=x+1)
fie v[x]=0;
pentru (fie x=0; x<n; fie x=x+1)
'''{citeste y;fie v[x]=y;};'''
fie xmin=0;
fie xmax=0;
pentru (fie x=0; x<n; fie x=x+1)
{daca (xmin>v[x]) atunci fie xmin=v[x];
altfel '''fie xmin=xmin;'''};
'''pentru ('''fie x=0; x<n; fie x=x+1)
{daca (xmax<v[x]) atunci fie xmax=v[x];
altfel '''xmax=xmax;'''};
text "Minimul din sir este";
scrie xmin;
text "Maximul din sir este";
scrie xmax;
citeste j;
};
Beta tester: Cristina (88). Multumesc mult pentru exemplu.