В файле numbers.txt записан список из целых чисел. Отсортировать их по возрастанию суммы цифр и записать в другой файл.

Занятия проводятся по расписанию.

Toggle Bar



 Алгоритмы 25 марта 2013 Просмотров: 8211

Алгоритмы записи алгоритмов

Выделяют три наиболее распространенные на практике записи алгоритмов:

словесный (запись на естественном языке);графический (запись с использованием графических символов);программный (тексты на языках программирования).

Словесный записи алгоритмов

Словесный записи алгоритма на естественном языке. Данный очень удобен, если нужно приближенно описать суть алгоритма. Однако при словесном описании не всегда удается ясно и точно выразить логику действий.

В качестве примера словесного записи алгоритма рассмотрим алгоритм нахождения площади прямоугольника

S=a*b,

где S – площадь прямоугольника; а, b – длины его сторон.

Очевидно, что a, b должны быть заданы заранее, иначе задачу решить невозможно.

Словестный записи алгоритма выглядит так:

Начало алгоритма.Задать численное значение стороны a.Задать численное значение стороны b.Вычислить площадь S прямоугольника по формуле S=a*b.Вывести результат вычислений.Конец алгоритма.

// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
begin
  // Формируем массив A случайных чисел и выводим его
  var a:=ArrRandom(ReadInteger('n='),1,50); a.Println;
  // Формируем последовательность кортежей s из четных элементов A
  var s:=a.Select((x,i)->Rec(x,i+1)).Where(x->x.Item1.IsEven);
  Write('Четные элементы: ');
  s.Select(x->x.Item1+'['+x.Item2+']').Println;
  Write('Их количество равно ',s.Count,', произведение равно ',
    s.Select(x->x.Item1).Aggregate(1.0,(p,i)->p*i))
end.

Тестовое решение:
n= 15
6 28 32 37 21 34 37 24 1 22 21 16 10 1 2
Четные элементы: 6[1] 28[2] 32[3] 34[6] 24[8] 22[10] 16[12] 10[13] 2[15]
Их количество равно 9, произведение равно 30883184640