"Паскалей" различных много. Массивы тоже бывают разные. В вопросе ничего не детализировано, поэтому речь пойдет об одномерных массивах.
1. Турбо (Борланд) Паскаль. Массив - статический, в нем последний элемент не нужно определять, поскольку его индекс известен по описанию массива.
2. Borland Delphi, Free Pascal. Статические массивы - все как и в Турбо Паскаль. Но есть и динамические массивы, индексируемые от нуля, поэтому индекс последнего элемента в них равен количеству элементов минус единица. Можно пользоваться функцией Length(a), возвращающей текущее количество элементов в массиве.
3. PascalABC.NET 3.3. Действительно все, что написано выше. И добавочно можно написать a.Length вместо Length(a).
Теоретически
1 символ 8 бит. 2500*8=20000 бит.
20000/7200=2,78 сек/стр
<span>90 сек / 2,78 = 32,37 стр. </span>
Var
s1,s2 : String;
n,i : Integer;
Begin
n:=0;
Readln(s1);
Readln(s2);
For i:=1 to Length(s1) do If Pos(s1[i],s2)=0 then Inc(n);
Writeln(n);
end.
Сначала взвешиваем 3 пары потом остаются 3 слитка представим то что 1 слиток это А 2 слиток В 3 С А+В В+С А+С вычесляем С: (А+С)+ (В+С)-(А+В)=С
Свойство алгоритма "конечность" по другому называется результативность и оно обозначает, что в результате выполнения заданных исполнителю шагов алгоритма мы получим результат.
Например, чтобы получить бутерброд с сыром и маслом (исходные продукты все есть), нужно проделать ряд действий:
1) взять кусочек хлеба
2)намазать хлеб маслом
3)отрезать кусочек сыра
4)положить сыр на бутерброд