Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.93/15: Рейтинг темы: голосов - 15, средняя оценка - 4.93
4 / 4 / 0
Регистрация: 24.09.2013
Сообщений: 147

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

25.09.2013, 00:19. Показов 2954. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Тема: Работа с несколькими массивами
Дан массив A размера N. Сформировать новый массив B того же размерами, элементы которого определяются следующим образом:
2 • AK, если AK <5,
BK =
AK / 2 в противном случае.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
25.09.2013, 00:19
Ответы с готовыми решениями:

Сформировать новый массив В того же размера, элементы которого определяются определенным образом
Дан массив А размера N. Сформировать новый массив В того же размера, элементы которого определяются следующим образом: Вк=2*Ак, если...

Дан массив A размера N. Сформировать новый массив B того же раз- мера, элементы которого определяются следующим образом:
Дан массив A размера N. Сформировать новый массив B того же раз- мера, элементы которого определяются следующим образом:

Сформировать одномерный массив, элементы которого определяются по правилу
Задана последовательность X = (x1, x2, …, x10). Сформировать из неё одномерный массив Y, элементы которого определяются по правилу , где...

1
Модератор
10435 / 5724 / 3405
Регистрация: 17.08.2012
Сообщений: 17,429
25.09.2013, 06:39
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
program Arr_ab;
 
var a, b: array [1..12] of real;
    k, n: integer;
 
begin
  randomize;
  repeat
    write('Enter N, 1..12: ');
    readln(n);
  until (n >= 1) and (n <= 12);
  writeln;
  writeln('Source array:');
  for k := 1 to n do
    begin
      a[k] := random(1000) / 100;
      write(a[k]:5:2, ' ')
    end;
  writeln;
  writeln;
  writeln('Destination array:');
  for k := 1 to n do
    begin
      if a[k] < 5 then b[k] := 2 * a[k]
                  else b[k] := a[k] / 2;
      write(b[k]:6:3);
    end;
  writeln;
  readln
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
25.09.2013, 06:39
Помогаю со студенческими работами здесь

Сформировать двумерный массив. Элементы определяются по правилу
Пожалуйста, помогите решить. Сформировать двумерный массив А, в котором элементы определяются по правилу: a=max(i+1,j)+cos(i),...

Вычислить и вывести массив В, все элементы которого определяются по правилу
3. Дан массив A=(0.1, -2.4, 12.56, -0.5, 0.4) Вычислить и вывести массив В, все элементы которого определяются по правилу: ...

Сформировать массив, элементы которого определяются по формуле
Мальчики, помогите.( Дали задание, нужно сделать как можно скорее. Сейчас на паре и не знаю что делать.( Даны два двумерных массива A и B...

Сформировать одномерный массив, элементы которого определяются формулой
Составьте программу с использованием указанного метода сортировки. Необходимо сформировать одномерный массив, элементы которого...

Сформировать новый массив В того же размера по правилу
Помогите пожалуйста с заданием. Задание:Дан массив А размера m.Сформировать новый массив В того же размера по следующему правилу:элемент...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
Реалии
Hrethgir 01.03.2026
Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни
kumehtar 27.02.2026
Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru