Складіть обробник події Click для другої кнопки , виконання якого ,
залежно від вибраних прапорців , приведе до визначення того, чи є
відповідний прямокутник квадратом.

Сейчас мы часто пользуемся интернетом, но хорошо это или плохо? Давайте разберем сначала плюсы интернета. Интернет находить нужную информацию, ты можешь легко найти кучу информации обо всем, что тебе нужно. Ты легко можешь общаться с друзьями и дальними родственниками. Так же ты можешь начать обучатся языкам или же какими-то предметами, которые тебя интересуют и которых нет в школьной программе, это и является самообразованием. Еще ты можешь «подтянуть» предмет, который ты плохо знаешь, ведь в интернете есть много разных учебников. Теперь с интернета не надо тратить деньги на книги ведь любую книгу можно скачать даже бесплатно. Ладно с плюсами разобрались, теперь давайте с минусами. Минусы интернета. Одни из самых банальных минусов это игры. Они есть как бесплатные так и платные, но оба варианта вызывают зависимость. Люди не замечают как сидят целыми днями за игрой которая не имеет смысла. В случаи подростка: снижается успеваемость в школе, отдаление от социального общества и т.п. Сейчас стало очень много спама в интернете и порнографии, и конечно же интернет является главным источником СМИ, что приводит к недостоверной информации (желтая пресса). Так как уследить за всеми сайтами не возможно, то появляются сайты через которые люди пропагандируют, даже например ислам, или говорят что наркотики это круто, даже если это не так. Я хочу сказать что в интернет есть положительные стороны и отрицательные, но если ты разумный человек ты будешь использовать интернет только по необходимости.

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
var (n,m):= ReadInteger2('n, m -> ');
var a:= MatrRandom(m,n);Writeln('Исходная матрица:');a.Println;
dec(n);dec(m);for var i:= 0 to m do
begin
  swap(a[i, a.Row(i).IndexMin],a[i, n]);
  swap(a[i, a.Row(i).IndexMax],a[i, 0]);
end;
Writeln('Конечная матрица:');
a.Print
end.

Пример:
n, m ->  5 6
Исходная матрица:
  99   9  30  83  11
  89  13  70  50  54
  43  59  22  13  89
  67  27  48  72  41
  63  62   5  58  71
  45  35  60   3  95
Конечная матрица:
  99  11  30  83   9
  89  54  70  50  13
  89  59  22  43  13
  72  41  48  67  27
  71  62  63  58   5
  95  35  60  45   3