<em>// PascalABC.NET 3.2, сборка 1377 от 19.01.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadArrReal('Введите семь различных двухзначных чисел'+NewLine,7);
a.Select((x,i)->Format('[{1}]:{0}',x,i+1)).Println(', ');
var imax:=a.IndexMax;
var imin:=a.IndexMin;
Writeln('Максимальный элемент: ',Format('[{0}]:{1}',imax+1,a[imax]));
Writeln('Минимальный элемент: ',Format('[{0}]:{1}',imin+1,a[imin]));
Writeln('Максимальный элемент больше минимального в ',
Round(a[imax]/a[imin]),' раз(а)')
end.
<u>Пример</u>
Введите семь различных двухзначных чисел
23 64 24 28 21 11 19
[1]:23, [2]:64, [3]:24, [4]:28, [5]:21, [6]:11, [7]:19
Максимальный элемент: [2]:64
Минимальный элемент: [6]:11
Максимальный элемент больше минимального в 6 раз(а)
1.Они имеют форму, цвет и назначение.
2.Свойства объекта бывают общими и отличительными.Общие свойства — свойства,которыми обладают все рассматриваемые объекты без исключения.Отличительные свойства — свойства, которые позволяют отличать объекты один от другого.
3.Существенные и несущественные свойства математических объектов в обучении математике Существенные и несущественные свойства математических объектов раскрываются в процессе определения понятий математики. Множество существенных свойств составляют содержание понятия. Это свойство общее, но не существенное.
some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text some text
Первое, это B. Перевернете картинку, будет лучше решать.