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

@axselob · Регистрация: 27.04.2017

В одномерном массиве данные размещены парами: в первых элементах значения аргумента, во вторых – соответствующие им значения функции. Вывести на экран элементы этого массива в виде таблицы.

@ZX Spectrum-128 · 28.04.2017, 09:28

Сообщение от axselob

значения функции

Функция не приведена.

@volvo · 28.04.2017, 11:09

Функция не нужна:

Pascal

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.

@axselob · 11.05.2017, 18:49 **[ТС]**

Спасибо

@JuriiMW · 12.05.2017, 07:00

Или с использованием флага:

Pascal

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

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.

@axselob 0 / 0 / 0 Регистрация: 27.04.2017 Сообщений: 10
		1
	Вывести заданный массив на экран в виде таблицы 27.04.2017, 18:41. Показов 1076. Ответов 4 Метки нет (Все метки) В одномерном массиве данные размещены парами: в первых элементах значения аргумента, во вторых – соответствующие им значения функции. Вывести на экран элементы этого массива в виде таблицы. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

@ZX Spectrum-128 6803 / 4562 / 4817 Регистрация: 05.06.2014 Сообщений: 22,438
	28.04.2017, 09:28	2
	Сообщение от axselob значения функции Функция не приведена. 0

@axselob 0 / 0 / 0 Регистрация: 27.04.2017 Сообщений: 10
	11.05.2017, 18:49 [ТС]	4
	Спасибо 0

Опции темы

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

Решение