1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Roman1 |
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 8 Пол: Мужской Репутация: 0 |
помогите пожалуйста:
Считать из текстового файла Beg.txt матрицу Р(2,10). Элементы столбцов соответственно абсцисса и ордината одной из десяти точек плоскости. Если нет ни одной пары точек, расстояние между которыми меньше заданной величины R, заменить на нуль в матрице Р все отрицательные абсциссы точек, увеличив ординаты этих точек на R. Результат записать в файл Rez.txt. Если получится, то сегодня |
Roman1 задача на паскале.матрица (другая) 22.06.2006 21:13
Bokul uses crt;
const r=-10;
type
main=array[1..10,1… 22.06.2006 23:30
volvo Bokul,
var f: file of main; далеко не то же самое,… 22.06.2006 23:33
Bokul volvo, не увидел :unsure: , сейчас исправлю. 22.06.2006 23:36
Bokul
А здесь и не надо Begin - ординату в любом случа… 23.06.2006 0:15
volvo А здесь и не надо Begin - ординату в любом случае … 23.06.2006 0:23
Bokul
Опять моя невнимательность проявляется... 23.06.2006 0:35
Roman1 Спасибо большое!) код Bokul рабочий? ещё не ко… 23.06.2006 0:41
Bokul
Вот рабочий
uses crt;
const r=-10;
type
mai… 23.06.2006 0:50![]() ![]() |
|
Текстовая версия | 7.12.2025 21:09 |