se considera tabloul A[1..n] , n ≤ 100 de numere intregi. Scrieti un program pascal care determina elementul maxim si fiecare element a tabloului A este inmultit cu elementul maxim.
Răspunsuri la întrebare
Răspuns de
3
Răspuns de
1
rogram tablou;
var a:array[1..100] of integer;
n,i,max:integer;
begin
writeln('Dati n'); readln(n);
for i:=1 to n do read(a[i]);
max:=a[1];
for i:=1 to n do
if a[i]>max then max:=a[i];
writeln('Elementul este ',max);
for i:=1 to n do
begin
a[i]:=a[i]*max;
write(a[i],' ');
end;
end.
Alte întrebări interesante
Limba română,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă