Главная arrow icon Вопросы arrow icon Учеба и наука arrow icon Информатика arrow icon Дан массив из N элементов (N-…

Дан массив из N элементов (N- четное). Распечатать его в следующем порядке: a1,an,a2,a(n-1)...,a(n/2),a(n/2+1). Через Pascal ABC. - вопрос №2672138

Ерке
26.11.17
Учеба и наука / Информатика
1 ответ

Лучший ответ по мнению автора
Возможный вариант :
program array;
var
   a: array[1..10] of integer;
   N,i,k: integer;
    
    begin
      write('Введите четное число N: ');
      readln(N);
    for i := 2 to N do a[i] := random(20);
    for i := 1 to N do write(a[i]:4);
    writeln;
    writeln('результат');
    k:=N div 2;
    for i := 1 to k do write (a[i]:4,a[N+1-i]:4);
 end.
26.11.17
Лучший ответ по мнению автора

Еva
Рейтинг: 121 998
6-й в Учебе и науке
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Похожие вопросы
1 ответ
19.11.11
Вопрос задан анонимно
Учеба и наука > Информатика
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store
  • карты visa
  • карты master card
  • карты maestro
  • карты МИР
Мы используем файлы cookie. Пользуясь сайтом, вы принимаете условия нашего соглашения. Принять Детальнее