Форум
» Назад на решение задач по физике и термеху
Регистрация | Профиль | Войти | Забытый пароль | Присутствующие | Справка | Поиск

» Добро пожаловать, Гость: Войти | Регистрация
    Форум
    Информационные технологии
        Турбо Паскаль. Программирование на Pascal
Отметить все сообщения как прочитанные   [ Помощь ]
» Добро пожаловать на форум "Информационные технологии" «

Переход к теме
<< Назад Вперед >>
Несколько страниц [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 ]
Модераторы: paradise, KMA
  

KMA



Долгожитель

bart никому не лень, но твоя фраза, что ты нуль, еще больше расслабляет к помощи, тебе. Эти все задачи решаются в три строчки, при том требуют минимальных знаний по Паскалю, а это значит, что ты просто ленишься, и тебе в лом посмотреть в учебник, или справочник по языку. До тех пор, пока ты не привидешь исходники тебе никто помогать не будет. Я могу решить все эти задачи, поэтому помощь гарантируется, но только помощь, иначе -- плата за лень.

P. S. Тебе даже лень посмотреть все тему, там как минимум есть четыре похожих решения данных задач.  

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 22 мая 2006 19:32 | IP
bart


Удален

просто реально нету времени

Всего сообщений: N/A | Присоединился: N/A | Отправлено: 23 мая 2006 16:19 | IP
bart


Удален

эх... тебе меня не понять лан бб

Всего сообщений: N/A | Присоединился: N/A | Отправлено: 23 мая 2006 16:20 | IP
KMA



Долгожитель

Блин, а у нас это время есть???? Ты парень прости, но если ты даже свои задачи решить не можешь, то почему тебе кто-то должен их решать безвозмездно???

Этот эгоизм меня больше всего раздражает. Я так же могу плакаться, кричать помогите и т. п. вместо того, чтобы сесть и самому все проработать, тем самым теряя время. Я напишу решения, но только в общем виде, а уж переводить ты будешь сам.

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 23 мая 2006 17:17 | IP
KMA



Долгожитель

Короче вот тебе ссылка, там максимум. Все измениться, если привидешь решения, или хотя бы код http://physics.9zima.com/viewtopic.php?p=690#690


-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 23 мая 2006 17:57 | IP
Mas


Новичок

Нужно найти периметр матрицы.
Посмотрите, пожалуйста, как исправить?

program progt;
var
i,j,sum,n:integer;
s:text;
begin
assign(s,'matriza.txt');
rewrite(s);
for i:=1 to n do
begin
    readln(t);
    writeln(s,t);
end;
begin
reset(s);
          sum:=t[1,1]+t[n,1]+t[1,n]+t[n,n];
          for j:=1 to (n-1) do
begin
    read(s,t);
    sum:=sum+s[1,i]+s[n,i]+s[i,1]+s[i,n];
end;
end;

close(s);
writeln(sum);
end.

Всего сообщений: 8 | Присоединился: май 2006 | Отправлено: 23 мая 2006 21:07 | IP
miss_graffiti


Долгожитель

Mas, что такое "периметр матрицы"?

я бы посоветовала после rewrite до reset файл все же закрыть...
и бегинов у тебя, имхо, многовато.

Всего сообщений: 670 | Присоединился: сентябрь 2005 | Отправлено: 23 мая 2006 22:31 | IP
KMA



Долгожитель

Mas
Так, а для чего ты используешь файл? Что подразумевается под периметром матрицы? Лучше было бы если б ты оставил полное уловие задачи.

assign(s,'matriza.txt');
rewrite(s);
for i:=1 to n do
begin
   readln(t);
   writeln(s,t);
end;
с этим понятно, ты пишешь в файл все, что пользователь вводит с клавиатуры. Это правильно.

begin
reset(s);
         sum:=t[1,1]+t[n,1]+t[1,n]+t[n,n];
         for j:=1 to (n-1) do
begin
   read(s,t);
   sum:=sum+s[1,i]+s[n,i]+s[i,1]+s[i,n];
end;
end;

Долго пытался догнать для чего первый begin, что он раскрывает, так и не понял видимо твоя ошибка. И последний end то же надо убрать, а то мешается. Далее, ты открываешь файл для чтения, это понятно, хочешь поучить данные, но потом, что за чушь. Ты переменной (заметь, не массиву, так как в начале индексы не указывались, значит простой тип, и точно должен быть ниже или integer) t, которая у тебя не описана присваиваешь какие-то индексы, и видимо что-то из них пытаешься получить.... ???????????????? Я, конечно многое видел, но такое!!!!
Ладно, самое интересное впереди. Ты все читаешь из файла s в переменную t, после чего обращаешься к файловой переменной, как к массиву!!!???? и пытаешься что-то из этого извлечь... О ужас. Не обижайся, пожалуйста, но такого словарного паноса я давно не встречал.
Лучше напиши полное условие задачи, а мы уж тебе как-нибудь поможем.  

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 23 мая 2006 22:39 | IP
KMA



Долгожитель

miss graffiti, если общаешься с файлом, то для того, чтобы прочитать, или перезаписать не обязательно закрывать его, а потом делать другие операции. Хотя можно для подстраховки, но это как правило опусткается.

-----
Gentoo, FreeBSD 7.2, PHP, JavaScript (jQuery), Python, Shell
Помогаю с задачами только на форуме.
Все мои действия четко согласуются с правилами раздела. Поэтому никаких претензий и обид.

Всего сообщений: 940 | Присоединился: декабрь 2005 | Отправлено: 23 мая 2006 22:43 | IP
Mas


Новичок

Задание: записать в файл матрицу, без использования массива, затем открыть файл на чтение и посчитать периметр матрицы.

Всего сообщений: 8 | Присоединился: май 2006 | Отправлено: 24 мая 2006 9:00 | IP

Эта тема закрыта, новые ответы не принимаются

Переход к теме
<< Назад Вперед >>
Несколько страниц [ 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 ]

Форум работает на скрипте © Ikonboard.com