oClasaAnonima Megaelev

Data inscrierii: 11/Apr/2008 Mesaje: 29
|
Trimis: 13.04.2008 14:16 Titlul subiectului: Problema 19 |
|
|
| Cod: |
{19. se citeste de la tastatura n, si apoi n perechi de cate 2 nr intregi a si b
(a<0<b) numere ce reprezinta capetele unor intervale inchise. afisati pe ecran,
doua numere x si y ce reprezinta capetele intervalului intersectie al celor n
intervale date}
program ex19;
var i,n, a, b, max, min:integer;
begin
write('n: '); readln(n);
max:=-maxint;
min:=maxint;
for i:=1 to n do begin
write('a: '); readln(a);
write('b: '); readln(b);
if a>max then max:=a;
if b<min then min:=b;
end;
write('[',max,',',min,']');
end.
|
|
|