Помощь - Поиск - Пользователи - Календарь
Полная версия: вопрос
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
marwell
Дан массив чисел: Y=(-1.5, 0.3, 6.2, -8.4, 0, 7.2, 2.6). Напишите программу вычисления суммы элементов с нечетными индексами и произведения элементов с четными индексами.
У меня только один вопрос: как можно описать массив Y чтобы пользователю не приходилось вводить элементы самостоятельно?
TarasBer
Чтобы не писать занудное Y[0] := 0; Y[1] := 1; Y[2] := 2; итд?
Ну можно задать типизированную константу.


type
TArr = array [0 .. 9] of extended;

const
a: TArr = (0,1,2,3,4,5,6,7,8,9);

var
b: TArr;

...
b := a;


marwell
Цитата(TarasBer @ 19.04.2010 15:21) *

Чтобы не писать занудное Y[0] := 0; Y[1] := 1; Y[2] := 2; итд?
Ну можно задать типизированную константу.


type
TArr = array [0 .. 9] of extended;

const
a: TArr = (0,1,2,3,4,5,6,7,8,9);

var
b: TArr;

...
b := a;




спасибо!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.