Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
MAKXIMUS

Преобразовать массив

20.11.2012, 22:42. Показов 1514. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Собственно хотелось бы не само решение, а так чтобы разобраться(довольно слабо понимаю что и как нужно делать и в какой последовательности)

Задача. Составьте программу, которая формирует массив из 10 случайных чисел в диапазоне от -10 до 10:
а) четные числа делит на 2, а к нечетным - прибавляет 4
б) отрицательные элементы возводит в куб, а из положительных извлекает корень
в) числа, кратные 5 увеличивает в 2 раза, а у остальных элементов находит остаток от деления на 3
г) меняет местами значения второго и предпоследнего элементов

На экран выводится исходный и преобразованный массив с поясняющим текстом.
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
20.11.2012, 22:42
Ответы с готовыми решениями:

Дан одномерный массив размера n, преобразовать его в обратный массив
дан одномерный масив n количкства преоброзовать его в обратный масив если обратный масив подченяется с о перевести все элементы масива в...

Массив: преобразовать исходный массив по заданному правилу
Дан одномерный массив A (a1,a2, ..., an). Найти массив B, того же размера B (b1,b2,...,bn), где b12 = a1 +2a1 - I, для всех I=1,..,n; ...

преобразовать массив
преобразовать массив s, поворачивая его вокруг центра на 90, 180,270 градусов против часовой стрелки

1
Неадекват и грубиян
 Аватар для pryda
310 / 297 / 301
Регистрация: 22.02.2010
Сообщений: 647
21.11.2012, 03:24
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var a:array[1..10]of integer;
    i,tmp:integer;
begin
randomize;
writeln('Исходный массив:');
for i:=1 to 10 do
begin
  a[i]:=random(21)-10;
  write(a[i]:5);
end;
writeln;
writeln('Преобразованный массив:');
for i:=1 to 10 do
begin
  if odd(a[i]) then a[i]:=a[i]+4 else a[i]:=round(a[i]/2);
  if a[i]<0 then a[i]:=a[i]*sqr(a[i]) else a[i]:=round(sqrt(a[i]));
  if a[i] mod 5=0 then a[i]:=a[i]*2 else a[i]:=a[i] mod 3;
end;
tmp:=a[2]; a[2]:=a[9]; a[9]:=tmp;
for i:=1 to 10 do write(a[i]:5);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
21.11.2012, 03:24
Помогаю со студенческими работами здесь

Преобразовать массив
Дан одномерный массив A(10) Все числа преобразовать таким образом: начиная со второго и до предпоследнего: ai = ai-1 + ai+1 - ai

Преобразовать массив
Для решения задачи использовать 2 массива: исходный и результирующий (преобразованный в соответствии с условием задачи). Преобразовать...

Преобразовать массив по правилу
преобразовать массив x по следующему правилу(воспользовавшись вспомогательным массивом): Все отрицательные элементы массива x перенести в...

Преобразовать массив по правилу
Дано: массивы W(N,M), X(N). Преобразовать массив W следующим образом: положительные элементы итой строки массива W умножить на Xi, i...

Преобразовать массив по правилу
Даны вещественные массивы x1, x2,…, xn и y1, y2,…, yn. Преобразовать их по правилу: большее из значений xi и yi принять в качестве нового...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru