Informatică, întrebare adresată de marcelciobanu007, 8 ani în urmă

De la tastatura se introduce o secventa de minim 2 numere, ce se termina cu 0. Sa se scrie un program care afiseaza numarul mai mare. Programul trebuie facut in Pascal cu instrucțiunea FOR.


marcelciobanu007: De la 1 la 3 sa va scri x
marcelciobanu007: 3 de x
marcelciobanu007: Ei sunt scridi la intimplare dar trebuie sa aiba 0 la urms
marcelciobanu007: Scrisi.. Urma
marcelciobanu007: Sa spunem 700, 10, 50.
marcelciobanu007: Mie trebuie sami arate maximul din icşi
marcelciobanu007: In cazul dat 700
boiustef: nu cred că ai dreptate... eu înţeleg că se introduce o secvenţă de numere în care introducerea lui zero semnalează că se termină introducerea...
Şi nici cum nu înseamnă că fiecare număr se termină cu zero ...
Iată un exemplu se aşa secvenţă: 2 32 55 14 81 2 0
boiustef: Şi se cere de aflat maximul din secvenţă (în exemplu este 55)
Dar nu înţeleg de ce se insistă la folosirea instrucţiunii for ?
FOR se foloseşte atunci cînd se cunoaşte numărul de repetări, adică de elemente a secvenţei, ceea ce la noi nu se ştie... deci nu poate fi folosit FOR...
boiustef: eu pot scrie program dar nu cu for ...

Răspunsuri la întrebare

Răspuns de boiustef
1

program elementMaxim;

var num, max: integer;

begin

 write('introdu numere intregi. Stop este introducerea lui zero...');

 read(num);

 max:=num;

 while (num>0) do

   begin

     if (num>max) then max:=num;

     read(num);

   end;

 writeln('maximal este ', max);

end.

Alte întrebări interesante