0 / 0 / 0
Регистрация: 27.04.2017
Сообщений: 10
1

Вывести заданный массив на экран в виде таблицы

27.04.2017, 18:41. Показов 1076. Ответов 4
Метки нет (Все метки)

В одномерном массиве данные размещены парами: в первых элементах значения аргумента, во вторых – соответствующие им значения функции. Вывести на экран элементы этого массива в виде таблицы.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.04.2017, 18:41
Ответы с готовыми решениями:

Вывести массив на экран в виде таблицы
Создать массив с элементами akn =n f ( k ) + sin ( k ) g (n), где k, n =1, 2, 3, 4; ...

Массив: Вывести на экран монитора исходный двухмерный массив в виде таблицы чисел.
Условие: 1. Ввести двухмерный массив поэлементно с помощью клавиатуры или получить его, ...

Вывести массив на экран в виде таблицы, в конце каждой строки надо вывести минимальный элемент
Ребят , как вывести маленький элемент , что изменить в коде знак ">" меняю на "<" - не выходит. ...

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

4
Эксперт Pascal/Delphi
6803 / 4562 / 4817
Регистрация: 05.06.2014
Сообщений: 22,438
28.04.2017, 09:28 2
Цитата Сообщение от axselob Посмотреть сообщение
значения функции
Функция не приведена.
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
32449 / 20943 / 8105
Регистрация: 22.10.2011
Сообщений: 36,210
Записей в блоге: 7
28.04.2017, 11:09 3
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Функция не нужна:
Pascal
1
2
3
4
5
6
7
8
const n = 10;
var a : array[1 .. 2*n] of integer := 
  (1, 100, 2, 32, 3, 43, 4, 23, 5, 62, 6, 22, 7, 12, 8, 10, 9, 22, 10, 8);
  
begin
  for var i := 1 to n do
    writeln(a[2*i - 1]:5, a[2*i]:5);
end.
0
0 / 0 / 0
Регистрация: 27.04.2017
Сообщений: 10
11.05.2017, 18:49  [ТС] 4
Спасибо
0
5020 / 2607 / 2332
Регистрация: 10.12.2014
Сообщений: 9,927
12.05.2017, 07:00 5
Или с использованием флага:
Pascal
1
2
3
4
5
6
7
8
9
begin
  var a := ArrRandomInteger(20);
  var Second := True;
  for var i := 0 to 19 do
    begin
      Write(a[i]:3);
      Second := Not Second; if Second then WriteLn;
    end;
end.
Или просто по условию:
Pascal
1
2
3
4
5
6
7
8
begin
  var a := ArrRandomInteger(20);
  for var i := 0 to 19 do
    begin
      Write(a[i]:3);
      if Succ(i) mod 3 = 0 then WriteLn;
    end;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
12.05.2017, 07:00
Помогаю со студенческими работами здесь

Сожмите заданный массив, выбросив каждый второй элемент массива. Вывести на экран заданный и новый массив
Сожмите заданный массив, выбросив каждый второй элемент массива. Вывести на экран заданный и новый...

Массив: Вывести на экран значения х и функции y (х)=1-cos2 x) в виде таблицы
Помогите пожалуйста, срочно нужна помощь в массивах (не могу разобраться) Задание звучит так:...

Дан массив 4 на 4 из целых чисел, поменять местами элементы второй строчки с элементами четвёртой. Измененный массив вывести на экран в виде таблицы
Дан массив 4 на 4 из целых чисел, поменять местами элементы второй строчки с элементами четвёртой....

Сформировать массив записей с указанными полями и вывести его на экран в виде таблицы
Сформировать массив записей с указанными полями и вывести его на экран в виде таблицы....


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru