1. Рассматривается множество целых чисел, принадлежащих числовому отрезку (1007, 746001), в которых первая цифра – наибольшая из всех цифр, и при этом они имеют четное количество цифр 5 (не менее 2-х), Найдите
количество таких чисел и наибольшее такое число, начинающееся с 50, в ответе запишите дна целых числа: сначала
количество, затем наибольшее такое число, начинающееся с 50,
2.Рассматривается множество целых чисел, принадлежащих числовому отрезку (2020; 64 7038), у которых сумма цифр
меньше 10, и при этом наименьшая цифра не встречается среди первых трёх цифр. Найдите количество таких чисел и
такое число, наиболее близкое к среднему арифметическому значению этих чисел. В ответе запишите дна целых
числа: сначала количество, затем такое число, наиболее близкое к среднему арифметическому значение этих чисел,
3.Рассматривается множество целых чисел, принадлежащих числовому отрезку [1082; 129932), в которых цифры
записаны в порядке убывания при их прочтении слева направо, и при этом количество делителей каждого из этих
чисел кратно трём. Найдите количество таких чисел и наибольшее такое число, начинающееся с цифры 7. Вответе
запишите два целых числа: сначала количество, затем наибольшее такое число, начинающееся с цифры 7,
var
k: integer;
begin
readln(k);
if k< 0 then
writeln('не может такого быть')
else
begin
write('мы нашли в лесу ',k,' гриб');
if (k mod 100 in [5..19]) then
writeln('ов')
else if (k mod 10 in [2..4]) then
writeln('а')
else if (k mod 10=1) then
writeln
else
writeln('ов');
end;
end.
главная диагональ --- это набор элементов с координатами (индексами) (i,i), где i∈[1, n]. n -- размерность матрицы, а вот как быть с транспонированием, например, трёхмерной матрицы? какой смысл оно имеет в этом случае? как составить условие обмена элементов? примечание: вообще состоит в том, чтобы сделать матрицу самосопряжённой, переписать такой вот код для случая произвольной конечной размерности: -- данный код для двумерной матрицы копирует одну её половину (если резать по диагонали) на вторую, при этом комплексно сопрягая элементы. а точнее -- в этом коде непонятно только условие обмена новое -то есть какие координаты поставить: если очередной matrixelement (в эту переменную получаем очередной элемент матрицы) имеет набор координат (x,).