информация – постоянный спутник человека люди всегда стремились облегчить свой труд с механизмов и машин. и такой машиной для работы с информацией стал компьютер.
человек и алгоритм в нашей повседневной жизни нас окружают алгоритмы, любой человек выполняет свои действия по порядку, раздумывая, правильно ли он поступает.
или теоретическая часть: для многих существуют определенные правила (инструкции), объясняющие исполнителю, как решать данную . чем точнее и понятнее будут описаны правила решения , тем быстрее человек овладеет ими и будет эффективнее их применять.
program z1;
const n=8;
var a:array [1..n] of integer;
i,m: integer;
begin
writeln ('Результаты заплыва: ');
for i:= 1 to n do
begin
write(i,'-й: ');
readln(a[i])
end;
writeln;
m:=a[i];
for i:= 1 to n do
if a[i]<m then m:=a[i];
writeln('Лучший: ',m)
end.
program z2;
const n=12;
var a:array [1..n] of integer;
i,m: integer;
begin
writeln ('Массив: ');
for i:= 1 to n do
begin
write(i,'-й элемент: ');
readln(a[i])
end;
writeln;
m:=a[i];
for i:= 1 to n do
if a[i]>m then m:=a[i];
writeln('Максимальный: ',m)
end.
Объяснение:
Сначала вводим элементы массива.
Затем предполагаем, что первый элемент наименьший (1 задача) или наибольший (2 задача). Потом сравниваем элементы массива с переменной, в которую записали первый элемент, и меняем переменную, если условие срабатывает. Выводим результат на экран.
