ермин «алгоритм», впервые употребленный в современном значении. Лейбницем (1646–1716), является латинизированной формой имени великого персидского математика Мухаммеда бен Муссы аль-Хорезми (ок. 783 – ок. 850). Его книга «Об индийском счете» в XII в. была переведена на латинский язык и пользовалась широкой популярностью не одно столетие. Имя автора европейцы произносили как Алгоритми (Algorithmi), и со временем так стали называть в Европе всю систему десятичной арифметики.
Научное определение алгоритма дал А. Чёрч в 1930 году. В наше время понятие алгоритма является одним из основополагающих понятий вычислительной математики и информатики.
Алгоритм — это точное и полное описание последовательности действий над заданными объектами, позволяющее получить конечный результат.
Можно сказать, что алгоритм решения какой-либо задачи — это последовательность шагов реализации (или нахождения) этого решения, а процесс построения алгоритма (алгоритмизация) — разложение задачи на элементарные действия или операции.
Область математики, известная как теория алгоритмов, посвящена исследованию свойств записи, области применения различных алгоритмов, а также созданию новых алгоритмов. Теория алгоритмов находит широкое применение в различных областях деятельности человека — в технике, производстве, медицине, образовании и т. д. Появление компьютера позволило решать чрезвычайно сложные, трудоемкие задачи.
Определение алгоритма для применения в области информатики нуждается в некотором уточнении. Во-первых, решение задач в информатике всегда связано с преобразованием информации, а значит, исходными данными и результатом работы алгоритма должна быть информация. Это может быть представлено в виде схемы.
Объяснение:
Pascal
program basket;
uses crt;
var
fam, kom : array of string;
rost : array of double;
N,i:integer;
BEGIN
Clrscr;
writeln('Введите количество учеников');
readln(N);
setlength(fam, n);
setlength(rost, n);
writeln('Введите фамилию и рост ученика');
for i:=1 to N do begin
write('fam[',i,']= ');
read(fam[i-1]);
write('rost[',i,']= ');
readln(rost[i-1]);
end;
for i:=1 to N do
if rost[i-1]>=170 then begin
setlength(kom, length(kom)+1);
kom[length(kom)-1]:=fam[i-1];
end;
if length(kom)=0 then
writeln('кандидатов нет')
else
writeln('Список претендентов в сборную школы');
Writeln;
for i:=1 to length(kom) do
writeln(kom[i-1]);
readln
end.
