Предыдущая публикация
Ajutati-ma va rog.....
este data o problema...
INtrun tablou de N numere intregi de gasit numaru maxim si de inlokuit ku primu element
Следующая публикация
este data o problema...
INtrun tablou de N numere intregi de gasit numaru maxim si de inlokuit ku primu element
Комментарии 1
var v:array[1..100] of integer;
i,n,max:integer;
Begin
read
for i:=1 to n do
readln(v[i]);
max:=-maxint;
for i:=1 to n do
if v[i]>max then
max:=v[i];
for i:=1 to n do
if max=v[i] then
v[i]:=v[1];
for i:= 1 to n do
write(v[i],' '
end.
asa trebu ?