сервис вопросов и ответовЗадан массив А[1..5,1..6]. Поменять в нем местами первый и последний столбец.
10-11 класс|
|
Babaevafatima
28 дек. 2013 г., 20:48:09 (10 лет назад)
Karina0298
28 дек. 2013 г., 23:23:11 (10 лет назад)
var
a:array [1..5,1..6] of integer;
i,j,buf:integer;
begin
randomize;
for i:=1 to 5 do begin
for j:=1 to 6 do begin
a[i,j]:=random(8)+2;
write (a[i,j],' ');
end;
writeln;
end;
for i:=1 to 5 do begin
buf:=a[i,1];
a[i,1]:=a[i,6];
a[i,6]:=buf;
end;
writeln;
for i:=1 to 5 do begin
for j:=1 to 6 do write (a[i,j],' ');
writeln;
end;
readln;
end.
Маргарита20002
29 дек. 2013 г., 0:15:37 (10 лет назад)
Program vvv2;
uses crt;
const n=5;
const m=6;
var
a:array[1..n,1..m] of integer;
st:array[1..n] of integer;//массив для хранения столбца
i,j,nomer,min : integer;
begin
Randomize;
for i:=1 to n do
for j:=1 to m do
a[i,j]:= Random(100); //заполняем массив
writeln;
writeln('Начальный массив:');
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:5);//выводим массив
writeln;
end;
writeln('*** alphaues is thinking... ***');
for i:=1 to n do
begin
st[i]:=a[i,1];
a[i,1]:=a[i,m];
a[i,m]:= st[i];
end;
writeln;
writeln('Результат:');
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:5);//выводим массив
writeln;
end;
end.
Ответить
Другие вопросы из категории
вводится информация о семидневном туре в виде стоимостей в долларах США проезда, проживания в двухместном номере в сутки,питания в сутки, страховки и
трансфера. вычислить стоимость тура в долларах США и рублях.
С++
Написать программу, которая переводит число из 9-й системы счисления в 3-ю, не переводя все число в 10-ю. Выполнить отладку программы с помощью какого–либо примера, подготовленного Вами на бумаге.
Пользователь, хорошо владеющий навыками набора текста, в
среднем набирает 120 символов в минуту из компьютерного алфавита.
Компьютерный алфавит содержит 256 символов. Какое количество
информации пользователь введет в компьютер за 10 минут непрерывной
работы?
Читайте также
1. Помогите исправить ошибки и нарисовать блок-схему. Задание: дана матрица целых чисел размером
4х4. Поменять местами первый и последний элемент массива х.
Листингпрограммы:
Решить задачи:
Задача 1. Составьте программу, которая заполняет массив а[1..10] случайными целыми числами в диапазоне от 1 до 10, затем меняет местами первый и последний элементы.
HELP ME!! задан массив размерностью (10х10) элементов. присвоить элементам массиваизначение функции Y=cos(x^0.25-0.5x^0.5+0.25x^0.75) при изменении
аргумента от 6 с шагом 0.25.
найти максимальный элемент массива. сформулировать новый массив путем вычеркивания строки и столбца, на которых расположен максимальный элемент.
вывести на экран в формате 3 знака после запятой:
1. исходный массив
2. полученный массив
3. искомые элементы ( если они есть)
предесмотреть возможность вывода на экран и в файл....
Помогите написать программу в паскале. За ранее спасибо. Задача на одномерный массив. Задание 4. В одномерном массиве А[1..12]
необходимо поменять местами: а) первый и последний элементы массива; б) второй и минимальный элементы массива; в) третий и максимальный элементы массива; Вывести на экран исходный и результирующий массивы.
Вы находитесь на странице вопроса "Задан массив А[1..5,1..6]. Поменять в нем местами первый и последний столбец.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.