Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.12.2008, 20:30   #1
umnik
Новичок
Джуниор
 
Регистрация: 06.11.2008
Сообщений: 2
По умолчанию требуется помощь по Паскалю

сопсно задачко..кто возьмётся?
Заданы два массива записей, которые содержат сведения о фамилиях и среднем балле. Написать программу, которая переносит в любом порядке записи с двух заданных массивов в третий, причем, из двух одинаковых записей записывается только один. Упорядочить исходный массив по среднему баллу.
umnik вне форума Ответить с цитированием
Старый 03.12.2008, 20:35   #2
Sm1Le
Форумчанин
 
Аватар для Sm1Le
 
Регистрация: 31.10.2008
Сообщений: 500
По умолчанию

Цитата:
Сообщение от umnik Посмотреть сообщение
сопсно задачко..кто возьмётся?
.
ТЫ ! тебе ж надо ...

Я так понял Массив arr[100]:string
arr[1]='sidirov';arr[2]='5';arr[3]='4e6yrashka';..... Такой у тебя массив будет ?
Skype : UASm1Le.
Sm1Le вне форума Ответить с цитированием
Старый 03.12.2008, 20:40   #3
umnik
Новичок
Джуниор
 
Регистрация: 06.11.2008
Сообщений: 2
По умолчанию

угу, такой
umnik вне форума Ответить с цитированием
Старый 03.12.2008, 20:53   #4
Sm1Le
Форумчанин
 
Аватар для Sm1Le
 
Регистрация: 31.10.2008
Сообщений: 500
По умолчанию

Логичнее создать свой тип =))

arr[10]
arr1[10]
arr2[20]

->>>>>>>
x:=10;y:=0;q:=10;
for i:=1 to n do
begin
arr2[i]:=arr[i];
end;
for i:=1 to 10 do
begin
y:=1;
for y:=1 to 20
if arr1[i]<>arr2[y] then
begin
arr2[q]:=arr1[i];
q:=q+1;
end;

end;


Посмотри ...Вроде нормально тока чучуть дописать =)
Skype : UASm1Le.
Sm1Le вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Требуется помощь Я_Студент Помощь студентам 8 06.06.2008 09:31
Ребят, нужна помощь по Паскалю Agent[PNZ] Помощь студентам 4 14.12.2007 23:34
Нужна помощь по паскалю!! 4meen Помощь студентам 5 03.12.2007 12:09