Поделитесь своими знаниями, ответьте на вопрос:
РЕБЯТА НУЖНО ОЧЕНЬ ОЧЕНЬ Среди приведённых ниже трёх чисел, записанных в различных системах счисления, найдитемаксимальное и запишите его в ответе в десятичной системе счисления. В ответе запишите только число, основание системы счисления указывать не нужно.1416, 268, 110002.11.В одном из произведений Н. В. Гоголя, текст которого приведён в подкаталоге Гоголь каталогаПроза, присутствует персонаж Плюшкин. С поисковых средств операционной системы итекстового редактора выясните, сколько душ имеет данный персонаж.Выполните задание, распаковав архив на своём компьютере.12.Сколько файлов с расширением .txt содержится в подкаталогах каталога Поэзия? В ответе укажитетолько число.Выполните задание, распаковав архив на своём компьютере.DEMO-12.rar13.13.1 Используя информацию и иллюстративный материал, содержащийся в каталоге «Обыкновеннаябелка», создайте презентацию из трёх слайдов на тему «Обыкновенная белка». В презентации должнысодержаться краткие иллюстрированные сведения о внешнем виде, об ареале обитания, образе жизни ирационе обыкновенных белок. Все слайды должны быть выполнены в едином стиле, каждый слайддолжен быть озаглавлен.Обыкновенная белка.rar13.2 Создайте в текстовом редакторе документ и напишите в нём следующий текст, точновоспроизведя всё оформление текста, имеющееся в образце.Данный текст должен быть написан шрифтом размером 14 пунктов. Основной текст выровнен поширине, и первая строка абзаца имеет отступ в 1 см. В тексте есть слова, выделенные жирным шрифтом, курсивом и подчеркиванием.При этом допустимо, чтобы ширина Вашего текста отличалась от ширины текста в примере, поскольку ширина текста зависит от размера страницы и полей. В этом случае разбиение текста настроки должно соответствовать стандартной ширине абзаца.
program p1;
const n=10;
var a : array[1..n] of integer;
i,b,c:integer;
begin
randomize;
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
for i:=1 to n do {Заполнение исходного массива}
a[i]:=random(21)-10;
for i:=1 to n do {Вывод исходного массива(можно удалить эти строчки)}
write(a[i]:4);
c:=0; {Инверсия массива}
for i:=1 to 2 do begin
b:=a[i];
a[i]:=a[5-c];
a[5-c]:=b;
c:=c+1;
end;
c:=0;
for i:=6 to 8 do
begin
b:=a[i];
a[i]:=a[10-c];
a[10-c]:=b;
c:=c+1;
end;
writeln;
for i:=1 to n do {Вывод инверсированого массива}
write(a[i]:4);
close(input);
close(output);
end.