alenaya69918
?>

ответы:1.Начертание шрифта: полужирный, подчёркнутый.Цвет текста: синий.Выравнивание текста: по ширине.2.Начертание шрифта: курсив.Цвет текста: синий.Выравнивание текста: по центру.3.Начертание шрифта: полужирный, курсив.Цвет текста: синий.Выравнивание текста: по левому краю.4.Начертание шрифта: полужирный, курсив.Цвет текста: синий.Выравнивание текста: по ширине.​

Информатика

Ответы

АндреевичЮлия
Program arrayMinValueSwapFirst;var  numbers: array [1..10] of integer;  maxValIndex: integer;begin  write('Исходный массив: ');  for var i: integer := 1 to 10 do  begin    numbers[i] := random(11);    write(numbers[i]);    if i < 10 then      write(', ');  end;  var minVal: integer := -1; // Сюда записываем рекорд по значению  for var i: integer := 1 to 10 do    if (numbers[i] > minVal) then    begin      minVal := numbers[i];      maxValIndex := i;    end;  writeln();  writeln('Индекс максимального: ', maxValIndex);  var buf: integer := numbers[1];  numbers[1] := minVal;  numbers[maxValIndex] := buf;  write('Результат      : ');  for var i: integer := 1 to 10 do  begin    write(numbers[i]);    if i < 10 then      write(', ');  end;end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

ответы:1.Начертание шрифта: полужирный, подчёркнутый.Цвет текста: синий.Выравнивание текста: по ширине.2.Начертание шрифта: курсив.Цвет текста: синий.Выравнивание текста: по центру.3.Начертание шрифта: полужирный, курсив.Цвет текста: синий.Выравнивание текста: по левому краю.4.Начертание шрифта: полужирный, курсив.Цвет текста: синий.Выравнивание текста: по ширине.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

ulyana-d
Илья_Ветклиники1655
Adassa00441
marusyamr
Panda062000
morsh9345
tyrnaus
egcuzn86
Strelkov567
Kolokolnikova DANIIL179
juliapierrat
TrubnikovKlimenok926
Mariya694
annasv8
Анатольевич-Фатима