X   Сообщение сайта
(Сообщение закроется через 3 секунды)



 

Здравствуйте, гость ( Вход | Регистрация )

2 страниц V   1 2 >
Открыть тему
Тема закрыта
> Вопрос по Паскалю, фри помощь
Minato
Minato
Topic Starter сообщение 24.11.2010, 22:28; Ответить: Minato
Сообщение #1


Старожил
******

Группа: Banned
Сообщений: 1378
Регистрация: 24.8.2010
Из: Оренбург
Поблагодарили: 267 раз
Репутация:   37  


Всем добрый вечер. Требуется помощь по Турбо паскалю, интересует двумерный массив. Блин я плохо разбираюсь, если кто за "free" может написать прогу буду очень благодарен.
Здание: Найти сумму элементов массива 6х6, находящихся над главной диагональю

Готовлюсь к олимпиаде, одномерный массив понимаю, а с двумерным никак.


--------------------
Бан за кидок трудового народа.
0
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
tyz091191
tyz091191
сообщение 24.11.2010, 22:33; Ответить: tyz091191
Сообщение #2


Бывалый
****

Группа: User
Сообщений: 304
Регистрация: 22.2.2009
Из: Рязань
Поблагодарили: 82 раза
Репутация:   18  


хех, вспоминаю первый курс)))
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Dinamitt
Dinamitt
сообщение 24.11.2010, 22:33; Ответить: Dinamitt
Сообщение #3


Старожил
******

Группа: Active User
Сообщений: 1342
Регистрация: 7.9.2009
Поблагодарили: 624 раза
Репутация:   97  


Minato, литературы кругом достаточно. Зачем идти на олимпиаду если не понимаете? dead.gif
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Minato
Minato
Topic Starter сообщение 24.11.2010, 22:39; Ответить: Minato
Сообщение #4


Старожил
******

Группа: Banned
Сообщений: 1378
Регистрация: 24.8.2010
Из: Оренбург
Поблагодарили: 267 раз
Репутация:   37  


к олимпиадам готовятся, а во время подготовки возникают проблемы. Ну у меня там вообще отдельный случай, в общем не надо говорить, "не понимаешь не лезь тогда"


--------------------
Бан за кидок трудового народа.
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
rus-xp
rus-xp
сообщение 24.11.2010, 22:41; Ответить: rus-xp
Сообщение #5


клоновод
*****


Группа: Banned
Сообщений: 647
Регистрация: 19.4.2009
Поблагодарили: 147 раз
Репутация:   23  


Type
Vector = array [1..6] of integer;
Matrix= array [1..12] of vector;
Var m: matrix;

i, j, sum: integer;  
begin

sum:=0;
   for i :=1 to 6 do  
      for j :=1 to 12 do
         readln ( a [ i , j ]);
for i :=1 to 6 do  
begin
   for j :=1 to 12 do
      write ( a [ i , j ]:5);
   writeln;
end;

if i<j then
  sum:=sum+m[i,j];

writeln("Summa =",sum);
end.


Давно в с++ ушел. Но должно работать(не проверял)

Сообщение отредактировал rus-xp - 24.11.2010, 22:44


--------------------
бан за клоноводство и обман администрации форума
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Stinker007
Stinker007
сообщение 24.11.2010, 22:42; Ответить: Stinker007
Сообщение #6


кидала
******

Группа: Banned
Сообщений: 1740
Регистрация: 2.1.2009
Поблагодарили: 351 раз
Репутация:   46  


dll.gsu.by правда не знаю, есть ли доступ не студентам, там файлы по всем темам и куча заданий.

Dinamitt по паскалю книг нормальных нету, одна ахинея написана, пока поймёшь что-то перечитаешь ..... кучу ерунды.

Minato, если сможете получить доступ, то сразу заходите на форум и первый курс этого года, прошлые года обычно удаляются, находите нужную тему и качайте файлик, ну или решайте задачи, там они с подсказками и как-раз подготовитесь.


--------------------
кидала


Поблагодарили: (1)
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
bitrixoid
bitrixoid
сообщение 24.11.2010, 22:43; Ответить: bitrixoid
Сообщение #7


клоновод
******

Группа: Banned
Сообщений: 1951
Регистрация: 27.4.2009
Поблагодарили: 1118 раз
Репутация:   166  


в общем виде - генерим двойным циклом for рандомный массив, таким же образом и проводим вычисления: если i>j, т.е. номер строчки больше номера стоблца, а значит элемент под этими номерами "выше" главной диагонали, то sum:=sum+array(i,j)

Синтаксиса нифига не помню, задача простейшая. Параолимпиада чтоли?


--------------------
клоновод


Поблагодарили: (1)
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
rus-xp
rus-xp
сообщение 24.11.2010, 22:43; Ответить: rus-xp
Сообщение #8


клоновод
*****


Группа: Banned
Сообщений: 647
Регистрация: 19.4.2009
Поблагодарили: 147 раз
Репутация:   23  


если есть вопросы, задавай, готов ответить, только в ЛС, не хочу оффтопик создавать.
Программа выдает матрицу, ниже сумму. Хотя наверное стоит сделать рандомным заполнение, замаишься вводить каждый раз 36 элементов.


--------------------
бан за клоноводство и обман администрации форума


Поблагодарили: (1)
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
Minato
Minato
Topic Starter сообщение 24.11.2010, 22:48; Ответить: Minato
Сообщение #9


Старожил
******

Группа: Banned
Сообщений: 1378
Регистрация: 24.8.2010
Из: Оренбург
Поблагодарили: 267 раз
Репутация:   37  


rus-xp, bitrixoid, Stinker007, спасибо большое
rus-xp, вам вдвойне спасибо, сейчас проверю


--------------------
Бан за кидок трудового народа.
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
1807
1807
сообщение 25.11.2010, 11:57; Ответить: 1807
Сообщение #10


Участник
***


Группа: User
Сообщений: 160
Регистрация: 27.8.2010
Поблагодарили: 14 раз
Репутация:   3  


for i :=1 to 6 do

2 раза задавать не нужно )


--------------------
Куплю подписи, дорого
Помогу с установкой сапы бесплатно ICQ 9886806
Вернуться в начало страницы
 
Ответить с цитированием данного сообщения
2 страниц V   1 2 >
Открыть тему
Тема закрыта
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0


Свернуть

> Похожие темы

  Тема Ответов Автор Просмотров Последний ответ
Открытая тема (нет новых ответов) Вопрос по seo для интернет магазина
куда девать продвинутые товары, которые уже не выпускают
18 viktormerke 2815 15.12.2017, 15:18
автор: Smspva
Открытая тема (нет новых ответов) Вопрос к знатокам Instagram
20 SEOMR 4191 30.11.2017, 14:25
автор: DiscordPro
Открытая тема (нет новых ответов) Вопрос про Телеграмм
18 syd2010 1173 28.11.2017, 14:25
автор: PostBrigada
Открытая тема (нет новых ответов) Тема имеет прикрепленные файлыАrticle manager вопрос
0 Smile3D 441 24.11.2017, 18:27
автор: Smile3D
Открытая тема (нет новых ответов) Вопрос по трансферу доменов
8 MakDonald 1209 13.11.2017, 11:40
автор: bum


 



RSS Текстовая версия Сейчас: 18.12.2017, 5:35
Дизайн