Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 0
Регистрация: 08.10.2018
Сообщений: 93
1

Средства управления вводом/выводом. Массивы

28.10.2018, 18:18. Просмотров 324. Ответов 3
Метки нет (Все метки)


Cредства управления вводом/выводом. Дан целочисленный массив А(n,n) (n<=6). Вывести его на экран, рядом вывести этот же массив, но отображенный относительно вертикальной оси, проходящей через середину массива.

Пытался решить своими силами, но ничего не получилось. Искал помощи у гуру киберфорума, но не нашел тех, кто мог бы помочь.
Прошу вас, дорогие форумчане, помогите мне с данной задачей и объясните каким образом производить отображение относительно вертикальной оси, как это будет выглядеть?
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.10.2018, 18:18
Ответы с готовыми решениями:

Использование переключателей, списков, полос прокрутки для управления пользовательским вводом
Помогите, пожалуйста. Где ошибка в коде? Организовать ввод строк в список с позиции, на которой...

Использование переключателей, списков, полос прокрутки для управления пользовательским вводом
Ввести список строк в компонент TListBox и предусмотреть три варианта вывода во второй компонент...

Использование переключателей, списков, полос прокрутки для управления пользовательским вводом
Организовать ввод элементов массива и вывод упорядоченного массива по возрастанию. Вводить только...

Использование переключателей, списков, полос прокрутки для управления пользовательским вводом
Помогите пожалуйста с прогой. Ввести список строк. При щелчке на элементе списка необходимо...

3
Модератор
6752 / 4347 / 1868
Регистрация: 21.01.2014
Сообщений: 18,336
Записей в блоге: 3
28.10.2018, 18:20 2
Цитата Сообщение от ArseniyPC Посмотреть сообщение
Пытался решить своими силами
КАк пытались, показывайте...

Добавлено через 1 минуту
И задание приведите точно так, как оно Вам выдано!!! А не так, как Вы его поняли.
0
0 / 0 / 0
Регистрация: 08.10.2018
Сообщений: 93
28.10.2018, 18:25  [ТС] 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
uses crt;
const mx=6;
var a:array[1..mx,1..mx] of integer;
    n,i,j,x:integer;
begin
repeat
write('Введите размер массива от 2 до ',mx,' n=');
readln(n);
until n in [2..mx];
clrscr;
writeln('Исходный массив');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=10*j+i;
    write(a[i,j]:4);
   end;
  writeln;
 end;
for j:=1 to n div 2 do
for i:=1 to n do
 begin
  x:=a[i,j];
  a[i,j]:=a[i,n-j+1];
  a[i,n-j+1]:=x;
 end;
gotoXY(20,1);
write('Измененный массив');
for i:=1 to n do
 begin
  gotoXY(18,i+1);
  for j:=1 to n do
  write(a[i,j]:4);
 end;
end.


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program two_arrays;
 
{$mode objfpc}{$H+}
 
uses
 
  Classes, sysutils;
 
var
   d: array[0..5,0..5] of Integer =    ((1,2,3,4,5,6),
                                        (1,2,3,4,5,6),
                                        (1,2,3,4,5,6),
                                        (1,2,3,4,5,6),
                                        (1,2,3,4,5,6),
                                        (1,2,3,4,5,6));
   row: integer;
 
begin
  for row:= 0 to 5 do
      writeln(d[row, 0]:3, d[row, 1]:3, d[row, 2]:3, d[row, 3]:3, d[row, 4]:3, d[row, 5]:3,
              '     ',
              d[row, 5]:3, d[row, 4]:3, d[row, 3]:3, d[row, 2]:3, d[row, 1]:3, d[row, 0]:3);
  readln;
end.

Понимаю, что эти коды написаны на Паскале, но я совсем плох в делфи.

Добавлено через 1 минуту
Решить поставленную задачу, используя средства управления вводом/выводом. Дан целочисленный массив А(n,n) (n<=6). Вывести его на экран, рядом вывести этот же массив, но отображенный относительно вертикальной оси, проходящей через се-редину массива.
Само задание
0
Модератор
6752 / 4347 / 1868
Регистрация: 21.01.2014
Сообщений: 18,336
Записей в блоге: 3
28.10.2018, 19:04 4
Цитата Сообщение от ArseniyPC Посмотреть сообщение
но отображенный относительно вертикальной оси, проходящей через се-редину массива
Вот это как-то можете уточнить: что это значит?
Вот массив:
9865431134
Где тут должна проходить "ось"? И Что должно отображаться "по разные стороны оси"?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.10.2018, 19:04

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Выполнить поставленную задачу, используя средства управления вводом/выводом
Решить поставленную задачу, используя средства управления вводом/выводом. Дан целочисленный массив...

Структура системы управления вводом-выводом
Помогите, пожалуйста, глупой девушке-программисту. Изучаю совсем недавно Unix.Совсем не мое.Но...

Значения флагов-манипуляторов управления вводом/выводом.
Почему отличаются значения флагов-манипуляторов управления вводом/выводом, которые нахожу в инете,...

Файловая система и система управления вводом-выводом в ОС Linux
Дали задание написать вот что: &quot;Разработать программу, которая выводит на экран содержимое...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.