хранение информации в письменной форме уходит в глубь веков. до наших дней в некоторых местах сохранились наскальные письмена древнего человека, выполненные 25-20 тысяч лет назад; лунный календарь, выгравированный на кости 20 тысяч лет назад. для письма также использовались дерево, глина. многие века письменные документы составлялись на пергаментных свитках. это было « дорогим удовольствием». пергамент делался из кожи животных. ее растягивали, чтобы получить тонкие листы. когда на востоке научились ткать шелк, его стали использовать не только для одежды, но и для письма.в письменной форме уходит в глубь веков. до наших дней в некоторых местах сохранились наскальные письмена древнего человека, выполненные 25-20 тысяч лет назад; лунный календарь, выгравированный на кости 20 тысяч лет назад. для письма также использовались дерево, глина. многие века письменные документы составлялись на пергаментных свитках. это было « дорогим удовольствием». пергамент делался из кожи животных. ее растягивали, чтобы получить тонкие листы. когда на востоке научились ткать шелк, его стали использовать не только для одежды, но и для письма.
В Пистоне существует отдельный тип данных для хранения целых чисел. Для переменных этого типа определены операции +, -, * и **. Операция деления / для целых чисел возвращает вещественное число. Также функция возведения в степень возвращает значение вещественного типа, если показатель степени — отрицательное число. Но есть и специальная операция целочисленного деления, выполняющегося с отбрасыванием дробной части, которая обозначается //. Она возвращает целое число: целую часть частного. Другая близкая ей операция − это операция взятия остатка от деления, обозначаемая %. А каким словом они обозначаются - смотри в документации по языку.
const
N = 5;
var
a: array [1..N] of integer;
i: integer;
begin
for i:= 1 to N do
a[i]:= random(5) + 1;
writeln('Сформированный массив:');
for i:= 1 to N do
writeln(a[i]);
writeln('Номера элементов, совпадающих с первым элементом:');
for i:= 2 to N do
if a[i] = a[1] then writeln(i);
end.