Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 0
Регистрация: 22.03.2010
Сообщений: 17
1

Перестановка елементов масива

01.04.2010, 23:50. Просмотров 442. Ответов 2
Метки нет (Все метки)

Здраствуйте.....случилась такая ситуацыя что я не понимаю как зделать это на Delphi....
у меня есть примерно на паскале зделал....но как в Delphi перевести чтото неполучается
Вот условие....
Заданы действительные числа y1, y2, ..., y20 . Получить y1, y11, y3, y13, . . ., y9, y19 .
Заранее благодарен.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
var y:array[1..20] of real;
i:byte; p:real;
begin
clrscr;
randomize;
for i:=1 to 20 do y[i]:=random;
writeln('Pochatkovuy Mas:');
for i:=1 to 20 do write(i,')',y[i]:5:2,'':2);
writeln; writeln;
i:=2;
repeat
y[i]:=y[9+i];
i:=i+2;
until i>10;
writeln('Novui Mas:');
for i:=1 to 10 do write(i,')',y[i]:6:2,'':2);
readkey;
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.04.2010, 23:50
Ответы с готовыми решениями:

Дано масив чисел. Найти количество элементов масива, которые расположены между max и min элементами масива
Помогите, пожалуйста, вычислить количество элементов между максимальным и минимальным элементами....

Перестановка елементов масива
Уважаемые форумчане помогите решить эту сложную задачу: Действительные векторы заданы...

Перестановка елементов масива
Здраствуйте.....случилась такая ситуацыя что я не понимаю как зделать это на С++.... у меня есть...

Вывод елементов масива
Этот фрагмент кода выводит массив весь А, а должен выводить элементы в массиве А, которые не входят...

2
86 / 65 / 8
Регистрация: 29.09.2009
Сообщений: 388
02.04.2010, 00:29 2
Алгоритм твой... кое что пришлось переделать в связи с особенностями языка Delphi...
1
Вложения
Тип файла: rar fr.rar (167.0 Кб, 11 просмотров)
0 / 0 / 0
Регистрация: 22.03.2010
Сообщений: 17
02.04.2010, 00:32  [ТС] 3
пасипки =)
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.04.2010, 00:32

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

Найти количество положительных елементов масива А={a[i]}0<i<=33
Помогите пожалуйста решить: Найти количество положительных елементов масива А={a}0&lt;i&lt;=33, что...

найти произведение положительных елементов масива
найти произведение положительных елементов масива v(15) и количество всех отрицательных елементов...

Програма вычесления нулевых елементов масива
model small .stack 100h .data k db ? len equ 5 mas db 5,0,8,0,8 .code

Определить сумму елементов масива от ymax
Дан массив y1,....,y20 Определить сумму элементов массива от ymax до y20

определить сумму елементов масива целых чисел
кто может,помогите пожалуйста))) написать программу : обработка однородных масивов определить...

Сума елементов масива порядковый номер которых простое число
Задача: Дано последовательность не менее чем двох натуральных чисел, после которых следует ноль....


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

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

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