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

Последовательность. Если на четном месте находится элемент, кратный 3, заменить этот элемент на его квадрат

30.04.2012, 17:44. Просмотров 1670. Ответов 2
Метки нет (Все метки)

дана последовательность натуральных чисел.Если на четном месте находится элемент,кратный 3,то заменить этот элемент на его квадрат.Полученную последовательность вывести.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.04.2012, 17:44
Ответы с готовыми решениями:

Определить минимальный элемент, его номер в массиве, заменить этот элемент элемент числом 1000
1. Задать массив А с помощью генератора случайных чисел положительными и отрицательными числами....

Увеличить элемент массива в 2 раза, если он стоит на четном месте
Буду очень благодарен, кто чем поможет:cry: 1 Сформировать одномерный массив из 15...

Заменить каждый отрицательный элемент его квадратом, если он стоит на нечетном месте
Помогите мне, пожалуйста, написать вот эти задачи: 2. Заменить каждый отрицательный элемент его...

Определить минимальный элемент, его № в массиве, заменить этот элемент его №
Помогите, пожалуйста Задать массив A с помощью генератора случайных чисел положительными и...

2
Эксперт С++
4709 / 2534 / 753
Регистрация: 18.08.2009
Сообщений: 4,550
30.04.2012, 18:31 2
Лучший ответ Сообщение было отмечено Кристюша5 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var a: array[1..10] of integer; i: byte;
begin
randomize;
writeln('Исходный массив:');   
for i:=1 to 10 do
begin
a[i]:=random(10);   
write(a[i],' ');
end;
writeln('Полученный массив:');  
for i:=1 to 10 do
begin
  if (i mod 2=0) and (a[i] mod 3=0) then a[i]:=a[i]*a[i];
  write(a[i],' ');  
end;
end.
1
0 / 0 / 0
Регистрация: 22.04.2012
Сообщений: 26
30.04.2012, 19:51  [ТС] 3
спасиибо большое**
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.04.2012, 19:51

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Определить, если ли в одномерном целочисленном массиве хотя бы один элемент, кратный а и кратный b
Заданы два натуральных числа a и b. Переменной w присвоить значение истина, если в одномерном...

Переменной t присвоить значение истина, если в одномерном массиве имеется хотя бы один элемент, кратный a и не кратный b
Заданы два числа a и b. Переменной t присвоить значение истина, если в одномерном массиве имеется...

Заменить элемент массива на сумму его соседей, если элемент массива четный и номер его лежит в промежутке от a до b
Случайным образом генерируется массив чисел. Пользователь вводит числа a и b. Заменить элемент...

Заменить элемент массива на сумму его соседей, если элемент массива четный и номер его лежит в промежутке
Случайным образом генерируется массив чисел. Пользователь вводит числа a и b. Заменить элемент...


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

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

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