Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
ruslan19693
0 / 0 / 0
Регистрация: 21.05.2011
Сообщений: 43
1

Получить новую последовательность, где каждый четный элемент увеличить на свой порядковый номер

24.06.2011, 20:40. Просмотров 929. Ответов 1
Метки нет (Все метки)

вводится последовательность,получить новую,где каждый четный элпмент увеличить на свой порядковый номер
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.06.2011, 20:40
Ответы с готовыми решениями:

Получить новую последовательность, где каждый элемент является числом цифр элемента исходной
1. Дан массив А размерностью М. Получить новую последовательность, где каждый элемент является...

Получить новую последовательность, где каждый элемент является близнецом элемента исходной последовательности
всем привет объясните зачем число К? зарание спосибо Дан массив А размерностью М и число К....

Получить последовательность, где каждый элемент - произведение всех предыдущих
6.30. Дана непустая последовательность положительных целых чисел а1 ,a2…., оканчивающаяся нулем....

Каждый элемент массива уменьшить на его порядковый номер
Помогите пожалуйста! с паскалем "Составить программу , которая каждый элемент массива уменьшает на...

Получить слово, образованное элементами файла, имеющими четный порядковый номер
Имеется типизированный файл, элементами которого являются отдельные буквы. Получить слово,...

1
swillrocker
328 / 117 / 114
Регистрация: 09.04.2011
Сообщений: 243
24.06.2011, 21:22 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
const n=10;
var a:array[1..n] of integer;
    i:integer;
begin
  for i:=1 to n do readln(a[i]);
  writeln('Do');
  for i:=1 to n do write(a[i],' ');
  writeln;
  for i:=1 to n do if i mod 2=0 then a[i]:=a[i]+i;
  writeln('Posle');
  for i:=1 to n do write(a[i],' ');
readln;
end.
0
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
24.06.2011, 21:22

Каждый элемент, имеющий четный номер, обнулить
Описать одномерный массив размерностью 14. Заполнить массив случайными значениями из диапазона от 5...

Каждый отрицательный элемент всей таблицы заменить на его порядковый номер
Если в первой половине массива содержится меньше нулевых элементов,чем во второй, то каждый...

Получить новую матрицу [B], умножив каждый элемент исходной матрицы на её максимальный элемент.
Дана матрица , размером NxM. Получить новую матрицу , умножив каждый элемент исходной матрицы на её...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.