Массивы в Паскале... Опции

[gryzlik]

[font=Arial][size=7]
Ребята,помогите! К завтрашнему дню нужна задача!!!Не могу сама решить...Сижу уже второй вечер,голову ломаю над ней!

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

[volvo]

for i := 1 to n do
  writeln(a[i]:10, a[n+i]:10);

(если массив - целочисленный, для вещественного придется добавить еще одну цифру к формату вывода...)

[gryzlik]

Спасибо большое....Только можно еще один вопрос: я уже попробовала прогу...

var a:array[1..10]of integer;
    x,y,n,i,j:integer;
Begin
Writeln('Vvedite kolichestvo elementov v massive',n);
Readln(n);
for i:=1 to n do
  begin
  write ('a(',i,')=');
  readln(a[i]);
  end;
writeln;
for j := 1 to n do
 writeln(a[i]:10, a[n+i]:10);
readln;
End.

Выводит примерно следующее 0 0
0 0
0 0
9 0
Но я же не ввожу одни 0....Простите я в массивах вообще не шарю...Да и Паскаль изучаю всего месяц!

М

Пользуемся тегами !