👤
a fost răspuns

Se considera tabloul [1,n] de numere intregi distincte n<=100.sa se scrie un program care efectueazaintreschimbarea elementullui maxim elementul minim.

Va rog <3

Răspuns :

KAPPACINNOZE
Răspunsul tău trebuie să aibă cel puțin 20 de caractere.
Vezi imaginea KAPPACINNO
var 

 a:array[1..100] of integer;
 i,n,min,max,pozmin,pozmax:integer;
 
begin

 read(n);
 writeln;
 
 for i:=1 to n do
  read(a[i]);
  
 min:=a[1];
 max:=a[2];
 
 for i:=1 to n do
  begin
  if a[i]<min then min:=a[i];
  if a[i]>max then max:=a[i];
  end;
  
 for i:=1 to n do 
  begin
  if a[i]=min then pozmin:=i;
  if a[i]=max then pozmax:=i;
  end;
 
 a[pozmin]:=max;
 a[pozmax]:=min;
 writeln;
 
 for i:=1 to n do 
  write(a[i],' ');
 
end.
Vă mulțumim că ați accesat site-ul nostru dedicat Informatică. Sperăm că informațiile furnizate v-au fost utile. Dacă aveți întrebări sau aveți nevoie de asistență suplimentară, nu ezitați să ne contactați. Vă așteptăm cu drag să reveniți și nu uitați să ne salvați la favorite!


Ze Studies: Alte intrebari