Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/4: Рейтинг темы: голосов - 4, средняя оценка - 5.00
ApTeMoH
0 / 0 / 0
Регистрация: 09.12.2011
Сообщений: 6
1

Cформулировать одномерный массив, задачка

09.12.2011, 17:09. Просмотров 653. Ответов 8
Метки нет (Все метки)

Сформулируйте массив из 15 символов с помощью датчика случайных чисел.
Получите новый массив каждый элемент которого равен кубу соответствующего элемента первого массива. В полученном массиве найдите максимальный элемент среди элементов с четным номером. Выведите на экран исходные и полученные результаты.


Заранее спасибо за помощь!
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
09.12.2011, 17:09
Ответы с готовыми решениями:

Задачка.Одномерный массив.
Даны два массива: A(10) и B(10). Сформулируйте массив C(10),предварительно определите его...

Задачка.Одномерный массив.
Сформулируйте и выведите на экран массив из девяти элементов, каждые три последовательных элемента...

Задачка на одномерный массив
Дан одномерный массив из 10 элементов.Заменить первый отрицательный элемент нулем.

Дан одномерный массив A из N элементов. Переписать положительные элементы массива в массив B, а отрицательные в массив C
Дан одномерный массив A из N элементов. Переписать положительные элементы массива в массив B, а...

Задачка на массив
Помогите пожалуйста с задачкой. Результаты игры по футболу хранятся в массиве. Каждые три...

8
Puporev
Модератор
55479 / 42580 / 29429
Регистрация: 18.05.2008
Сообщений: 100,731
09.12.2011, 17:29 2
Цитата Сообщение от ApTeMoH Посмотреть сообщение
массив из 15 символов
Цитата Сообщение от ApTeMoH Посмотреть сообщение
каждый элемент которого равен кубу соответствующего элемента
Ничего не попутали?
0
ApTeMoH
0 / 0 / 0
Регистрация: 09.12.2011
Сообщений: 6
09.12.2011, 17:34  [ТС] 3
Нет вроде. Первый массив - 15 символов, например 2, 4, 3, 1 и т. д. Второй массив тоже 15 символов только уже каждый элемент равен кубу каждого элемента первого массива, то есть будет 8, 64, 27, 1
0
Puporev
Модератор
55479 / 42580 / 29429
Регистрация: 18.05.2008
Сообщений: 100,731
09.12.2011, 17:40 4
Цитата Сообщение от ApTeMoH Посмотреть сообщение
Первый массив - 15 символов,
например А И У Д и т д ......
0
ApTeMoH
0 / 0 / 0
Регистрация: 09.12.2011
Сообщений: 6
09.12.2011, 18:07  [ТС] 5
Неправильно сформулировал, чисел
0
Puporev
Модератор
55479 / 42580 / 29429
Регистрация: 18.05.2008
Сообщений: 100,731
09.12.2011, 18:13 6
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
uses crt;
const n=15;
var a,b:array[1..n] of integer;
    i,mx:integer;
begin
randomize;
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(10);
  write(a[i]:4);
 end;
writeln;
writeln('Новый массив массив:');
for i:=1 to n do
 begin
  b[i]:=sqr(a[i])*a[i];
  write(b[i]:4);
 end;
writeln;
mx:=b[2];
for i:=3 to n do
if b[i]>mx then mx:=b[i];
write('Максимальный с четным номером=',mx);
end.
1
ApTeMoH
0 / 0 / 0
Регистрация: 09.12.2011
Сообщений: 6
09.12.2011, 18:57  [ТС] 7
Благодарю!

Добавлено через 39 минут
Цитата Сообщение от Puporev Посмотреть сообщение
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
uses crt;
const n=15;
var a,b:array[1..n] of integer;
    i,mx:integer;
begin
randomize;
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(10);
  write(a[i]:4);
 end;
writeln;
writeln('Новый массив массив:');
for i:=1 to n do
 begin
  b[i]:=sqr(a[i])*a[i];
  write(b[i]:4);
 end;
writeln;
mx:=b[2];
for i:=3 to n do
if b[i]>mx then mx:=b[i];
write('Максимальный с четным номером=',mx);
end.
хех, ошибочка вышла, максимальное число не всегда является четным
я тут подумал, каким образом можно сделать в цикле шаг 2? Возможно с помощью цыкла с пред условием?
0
Puporev
Модератор
55479 / 42580 / 29429
Регистрация: 18.05.2008
Сообщений: 100,731
09.12.2011, 19:02 8
Цитата Сообщение от ApTeMoH Посмотреть сообщение
максимальное число не всегда является четным
Естественно, ибо нам нужно
Цитата Сообщение от ApTeMoH Посмотреть сообщение
максимальный элемент среди элементов с четным номером.
Добавлено через 1 минуту
Да и я неправильно написал
Pascal
1
2
3
mx:=b[2];
for i:=3 to n do
if (i mod 2=0)and(b[i]>mx) then mx:=b[i];
0
ApTeMoH
0 / 0 / 0
Регистрация: 09.12.2011
Сообщений: 6
09.12.2011, 19:12  [ТС] 9
Теперь за максимальный принимается второй элемент независимо от значения...

Добавлено через 1 минуту
а все, у меня ошибка была
0
09.12.2011, 19:12
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.12.2011, 19:12

Про массив задачка
На массивы вооще не могу решать задачи помогите! Во входном файле дана последовательность чисел....

Задачка на двумерный массив
3) в прямоугольной матрице размером L*M, имеющей имя Matr содержаться целые числа. L-число строк,...

Создать двумерный массив все четные элементы переписать в одномерный массив
создать двумерный массив все четные элементы переписать в одномерный массив


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

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

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