Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на языке Pascal


Хостинг Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг на Windows 2008

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Pascal

Выпуск № 698
от 15.10.2008, 08:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 210, Экспертов: 44
В номере:Вопросов: 3, Ответов: 6

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 146554: Добрый день уважаемые эксперты. Помогите решить мне лабораторку: Создать матрицу A[1..N,1..M]. Найти две строки, в которых элементы одинаковы, но могут стоять в различной последовательности. Вывести номера строк и их значения. Прошу, на...
Вопрос № 146557: Здравствуйте, Уважаемые Эксперты! Пожалуйста, помогите составить программу, определяющую является ли введённая матрица ленточной с шириной ленты L. (программа должна быть как можно проще) Заранее спасибо!...
Вопрос № 146605: помогите пожалуйста решить две задачи <img src="http://rusfaq.ru/images/Forum/1.gif" border="0"> 1) дан файл целых чисел. удалить из него все элементы с четными номерами 2) дан файл целых чисел. удалить из него все отрицательные элементы...

Вопрос № 146.554
Добрый день уважаемые эксперты. Помогите решить мне лабораторку:

Создать матрицу A[1..N,1..M]. Найти две строки, в которых элементы одинаковы, но могут стоять в различной последовательности. Вывести номера строк и их значения.

Прошу, напишите решение этой задачи.
С уважением - Михаил
Отправлен: 09.10.2008, 10:44
Вопрос задал: Горбунов Михаил Валерьевич (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Зенченко Константин Николаевич
Здравствуйте, Горбунов Михаил Валерьевич!

Смотрите в приложениии программу.
Если строки совпали, то выводится только одна из совпадающих строк.
Вопросы задавайте в мини-форум.
Удачи!

Приложение:

---------
Итерация от человека, рекурсия — от Бога (Питер Дойч)

Ответ отправил: Зенченко Константин Николаевич (статус: Профессор)
Украина, Киев
Тел.: +380979536619
Адрес: Украина г.Киев
----
Ответ отправлен: 09.10.2008, 13:14

Отвечает: Пупорев Юрий Борисович
Здравствуйте, Горбунов Михаил Валерьевич!
Видел решение Зенченко Константина Николаевича, но решил выложить и свое, оно несколько другое. Можно вводить матрицу с клавиатуры, одинаковые строки и элементы в них в любом порядке.
Решение задачи с пояснениями в приложении. Для более простого сравнения элементов строк я их предварительно отсортировал, запомнив неотсортированный массив, чтобы в конце вывести строки в неотсортированном виде.

Приложение:

Ответ отправил: Пупорев Юрий Борисович (статус: Специалист)
Ответ отправлен: 09.10.2008, 13:23
Оценка за ответ: 5


Вопрос № 146.557
Здравствуйте, Уважаемые Эксперты!
Пожалуйста, помогите составить программу, определяющую является ли введённая матрица ленточной с шириной ленты L. (программа должна быть как можно проще)
Заранее спасибо!
Отправлен: 09.10.2008, 11:17
Вопрос задала: Olimpia (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Зенченко Константин Николаевич
Здравствуйте, Olimpia!

Программа в приложении.
Условие (abs(i-j)>l)and(a[i,j]<>0) проверяет только элементы матрицы вышедшие за пределы установленной ширины ленты, если он не равен нулю, то матрица не ленточная.
Удачи!

Приложение:

---------
Итерация от человека, рекурсия — от Бога (Питер Дойч)

Ответ отправил: Зенченко Константин Николаевич (статус: Профессор)
Украина, Киев
Тел.: +380979536619
Адрес: Украина г.Киев
----
Ответ отправлен: 09.10.2008, 16:00
Оценка за ответ: 5
Комментарий оценки:
Благодарю! это решение проще и намного понятнее.


Вопрос № 146.605
помогите пожалуйста решить две задачи
1) дан файл целых чисел. удалить из него все элементы с четными номерами
2) дан файл целых чисел. удалить из него все отрицательные элементы
Отправлен: 09.10.2008, 18:05
Вопрос задала: Клементенко Анастасия Александровна (статус: Посетитель)
Всего ответов: 3
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Великий Александр
Здравствуйте, Клементенко Анастасия Александровна!
Под целым числом понимаются числа которые мы используем при счете (натуральные) им обратные и 0. Следовательно наиболее подходящим типом для их описания является тип integer. По поводу решения 2-х вариантов задач можно сказать что они будут отличаться только условиями отсеивания элементов в массиве(в 1-ом - четность номеров элементов массива, во 2-ом - значение элементов массива).
Вот пример как должны выглядить оба варианта:

--------------------------------------------
Program variant1; {1) дан файл целых чисел. удалить из него все элементы с четными номерами}
var
a, b: array [1..100] of integer;
n, m, i: integer;
begin
Assign (input,'input.txt');
Assign (output,'output.txt');
Reset(input);
Rewrite(output);
n:=1;
while not eoln do
begin
Read (a[n]);
n:=n+1;
end;
m:=1;
For i:=1 to n-1 do
If i mod 2 = 1 then
begin
b[m]:=a[i];
m:=m+1;
end;
For i:=1 to m-1 do Write(b[i],' ');
Close(input);
Close(output);
end.

----------------------------------------------
Program variant2; {2) дан файл целых чисел. удалить из него все отрицательные элементы}
var
a, b: array [1..100] of integer;
n, m, i: integer;
begin
Assign (input,'input.txt');
Assign (output,'output.txt');
Reset(input);
Rewrite(output);
n:=1;
while not eoln do
begin
Read (a[n]);
n:=n+1;
end;
m:=1;
For i:=1 to n-1 do
If a[i]>0 then
begin
b[m]:=a[i];
m:=m+1;
end;
For i:=1 to m-1 do Write(b[i],' ');
Close(input);
Close(output);
end.
Ответ отправил: Великий Александр (статус: 1-ый класс)
Ответ отправлен: 09.10.2008, 20:43
Оценка за ответ: 5

Отвечает: Пупорев Юрий Борисович
Здравствуйте, Клементенко Анастасия Александровна!
Видел предыдущий ответ, прямо скажем решение неудачное. Привожу свой вариант.
Обе задачи удобно решить в одной программе. Создайте текстовый файл в папке с программой. Назовите его file. Заполните файл целыми числами, положительными, отрицательными и нолями, вводя их построчно через пробел. Сохраните файл.
Дальше пишем программу. Ее код с пояснениями в приложении.

Приложение:

Ответ отправил: Пупорев Юрий Борисович (статус: Специалист)
Ответ отправлен: 09.10.2008, 21:13
Оценка за ответ: 5

Отвечает: Шипулин Кирилл Владимирович
Здравствуйте, Клементенко Анастасия Александровна!
Я так понял, что вам дан массив из N чисел - я написал программу с массивом из 5 чисел и по условию нужные элементы заменяются нолями.
программы в приложении.

Приложение:

Ответ отправил: Шипулин Кирилл Владимирович (статус: 1-ый класс)
Ответ отправлен: 09.10.2008, 21:52
Оценка за ответ: 5


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2008, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале

∙ Версия системы: 5.6 от 14.10.2008

Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное