Some advantages are that you will have more control, you can quickly access documents and files, and you can easily preform more advance commands. Some downside are not GUI, you have to know exactly what to type to do the action you need, and you have to experience error codes sometimes with will need you to google what they mean
Hope this helps! And I hope to get brainliest!
Answer:
program arraysminfinder;
procedure minreplace();
var
no: array [1..10] of integer; (*no is an array of integers, 10 in all *)
a: integer= 0;
i: integer= 0;
c: integer= 0;
k: integer=0;
N: integer=0;
begin
(* We need to first initialize the array no with 0 values *)
for a := 1 to 10 do
no[a]:=0;
c:=no[1];
for a := 1 to 10 do
begin
if (no[i]<c) then
begin
c:=no[i];
k:=i;
end
else
begin
i:=i+1;
end
end;
writeln('Enter the new number:');
read(N);
no[k]:=N;
for a := 1 to 10 do
begin
writeln('The array elements are:',no[a]);
end;
end;
begin
end.
Explanation:
The program is as above. I have used a function, a for loop, an array of integers, and the if then else ladder for getting the desired output as mentioned in the program. If in case you want procedure for input and output, create a procedure like:
procedure replacenum():integer;
Begin
writeln("Enter the new number:" N);
no[k]:=N;
for a := 1 to 10 do
writeln("The array elements are:"no[a]);
end.
Similarly you can make a procedure for input.
