Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

составить программу, которая упорядочивает элементы четных строк по возрастанию,а нечетных по убыванию.Матрица размером 8х8.Полученную матрицу напечатать.

10-11 класс

Viktorkunahove 15 окт. 2014 г., 7:35:32 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Aleksveselowa2
15 окт. 2014 г., 9:26:35 (9 лет назад)

var
   i,j,k,p:integer;
   a:array[1..8,1..8]of integer;
begin
writeln('Исходный массив:');
for i:=1 to 8 do
begin 
for j:=1 to 8 do
    begin   
    a[i,j]:=random(20);
    write(a[i,j]:3)
    end;
    writeln
end;
for i:= 1 to 8 do
     for j:= 1 to 8 do
     for k:= 1 to 8 do
        begin
        if i mod 2=0 then
           begin
           if (a[i,j]<a[i,k]) then
              begin
              p:=a[i,j];
              a[i,j] := a[i,k];
              a[i,k] := p
              end
           end
           else
              if a[i,j] > a[i,k] then
                 begin
                 p:=a[i,j];
                 a[i,j] := a[i,k];
                 a[i,k] := p
                 end
       end;
writeln('Преобразованный массив:');
for i:=1 to 8 do
   begin
   for j:=1 to 8 do
      write(a[i,j]:3);
   writeln
   end;
end.

Ответить

Другие вопросы из категории

Расположите в порядке возрастания значения арифметических выражений :

1)CXXVIII+ 10001₂
2)206₁₀ - C9₁₆
3)MIV - 143₈
4)238₁₆ -100000₂
5)400₁₆ - CCLVI
6)3764₈ - 12₁₀

Читайте также

1.Составить программу, которая увеличивает каждый элемент настоящей таблице х [1 .. 10] на 1. 2. составить программу, замены положительных

элементов настоящей таблице х [1 .. 10] на 0.

3.составить программу, замены отрицательного элементов настоящей таблице х [1 .. 10] на их квадрат.

4.составить прогрумму, которая увеличивает на 2 все элементы настоящей таблице х [1 .. 10], которые больше 10.

Напишите прог-у на паскале... ПЛИИИИИИИИИИЗ 1)даны действительные числа a1, b1, c1, a2, b2, c2. Составьте программу, которая находит координаты точки

пересечения прямых, описываемых уравнениями a1x+b1x=c1 и a2x+b2x=c2. Если прямые пересекаются или не существуют-выдать соответствующее сообщение. 2) даны действительные числа a1, b1, a2, b2. Составьте программу, которая определяет, какая из точек A(a1;b1) или B(a2;b2) лежит на прямой у=2х+1. Если такой точки нет-вывести соответсвующее сообщение.

Даны три одномерных массива. Упорядочить их по возрастанию элементов. Составить программу проверки, сколько раз повторяется заданное число в каждом

массиве. Результаты сохранить в одномерном массиве и элементы массива отсортировать по возрастанию Даны три одномерных массива. Упорядочить их по возрастанию элементов. Составить программу проверки, сколько раз повторяется заданное число в каждом массиве. Результаты сохранить в одномерном массиве и элементы массива отсортировать по возрастанию

1)составьте программу вычисления суммы чисел в диапазоне от 45 до 115 45+....+115

2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N

------------------------ОПЕРАТОР WHILE

1.составить программу которая в введенном тексте удаляет пробелы 2.составить программу которая в ведённом тексте после пробелов ставит две буквы

к

3.составить прогу которая находит индекс последней запятой в введенном тексте



Вы находитесь на странице вопроса "составить программу, которая упорядочивает элементы четных строк по возрастанию,а нечетных по убыванию.Матрица размером 8х8.Полученную матрицу напечатать.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.