Windtalkers26 48 Опубликовано: 2 марта, 2017 Нужна помощьРАБОТА С МАССИВАМИ Заданы два одномерных массива А и В, состоящих из произвольного числа элементов. Сформулируйте массив С, содержащий элементы обоих массивов, расположенные в порядке возрастания. ДВУМЕРНЫЕ МАССИВЫ (МАТРИЦЫ) Дана целочисленная квадратная матрица порядка 8. Указать порядковый номер столбца, который обладает наибольшей суммой модулей элементов. Если таких, столбцов несколько, то взять первый. ПРОГРАММИРОВАНИЕ ЦИКЛИЧЕСКИХ АЛГОРИТМОВ (цикл с параметром) Вычислить y=sin l.0 + sin 1.1 + sin l.2 + ... + sin2.0. Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
drovik 7 378 Опубликовано: 2 марта, 2017 1 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Песня 6 963 Опубликовано: 2 марта, 2017 для меня , наверное, так и останется навсегда загадкой, зачем в наше время в ВУЗах изучают Паскаль... Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Windtalkers26 48 Опубликовано: 2 марта, 2017 Ребят, было бы проще, списали бы. Я ж не просто так сюда обратился) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
DSP 2 366 Опубликовано: 2 марта, 2017 4 минуты назад, Песня сказал: для меня , наверное, так и останется навсегда загадкой, зачем в наше время в ВУЗах изучают Паскаль... Предположу, что это техникум (колледж). Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Windtalkers26 48 Опубликовано: 2 марта, 2017 Племяшка учится в институте, в другом городе. Попросила помочь) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
drovik 7 378 Опубликовано: 2 марта, 2017 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
drovik 7 378 Опубликовано: 2 марта, 2017 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 9 минут назад, Windtalkers26 сказал: ПРОГРАММИРОВАНИЕ ЦИКЛИЧЕСКИХ АЛГОРИТМОВ (цикл с параметром) Вычислить y=sin l.0 + sin 1.1 + sin l.2 + ... + sin2.0. http://www.cyberforum.ru/turbo-pascal/thread608271.html 1 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Windtalkers26 48 Опубликовано: 2 марта, 2017 6 минут назад, drovik сказал: А какая специальность? Стандартизация) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 17 минут назад, Windtalkers26 сказал: ДВУМЕРНЫЕ МАССИВЫ (МАТРИЦЫ) Дана целочисленная квадратная матрица порядка 8. Указать порядковый номер столбца, который обладает наибольшей суммой модулей элементов. Если таких, столбцов несколько, то взять первый. http://www.cyberforum.ru/pascal/thread1651214.html Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 17 минут назад, Windtalkers26 сказал: Нужна помощьРАБОТА С МАССИВАМИ Заданы два одномерных массива А и В, состоящих из произвольного числа элементов. Сформулируйте массив С, содержащий элементы обоих массивов, расположенные в порядке возрастания. Этой задачи в нете нету, но задача простая, делали такие в колледже, ставить паскаль надо и вспоминать, лень =) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 http://pascalabc.net/WDE/ вот тут онлайн компилятор паскаля, сейчас попробую написать по быстрому.. =) 1 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Windtalkers26 48 Опубликовано: 2 марта, 2017 2 минуты назад, Startwar сказал: http://pascalabc.net/WDE/ вот тут онлайн компилятор паскаля, сейчас попробую написать по быстрому.. =) Спасибо) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
deadbeef 114 Опубликовано: 2 марта, 2017 25 минут назад, Песня сказал: для меня , наверное, так и останется навсегда загадкой, зачем в наше время в ВУЗах изучают Паскаль... а почему нет? для обучения алгоритмизации вполне адекватный язык, а что придётся применять на практике (если придётся) один хрен не угадаешь. в любом случае задача не синтаксису и специфическим фишкам языка научить, а программированию в принципе. 2 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 56 минут назад, Windtalkers26 сказал: Нужна помощьРАБОТА С МАССИВАМИ Заданы два одномерных массива А и В, состоящих из произвольного числа элементов. Сформулируйте массив С, содержащий элементы обоих массивов, расположенные в порядке возрастания. var a:array[1..20]of integer; b:array[1..20]of integer; c:array[1..20]of integer; i,j,s,s2,masa,masb,masc:integer; begin randomize; masa:=random(20); masb:=random(20); j:=0; write('Массив A: '); for i:=1 to masa do begin a[i]:=random(100); inc(masc); c[masc]:=a[i]; write(a[i]:4); end; writeln; write('Массив B: '); for i:=1 to masb do begin b[i]:=random(100); inc(masc); c[masc]:=b[i]; write(b[i]:4); end; for i:=2 to masc do begin j:=i; while c[j]<c[j-1] do begin s:=c[j]; c[j]:=c[j-1]; c[j-1]:=s; dec(j); if j=1 then break; end; end; writeln; write('Массив C: '); for i:=1 to masc do write(c[i]:4); end. Проверить можно тут: http://pascalabc.net/WDE/ Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Windtalkers26 48 Опубликовано: 2 марта, 2017 5 минут назад, Startwar сказал: var a:array[1..20]of integer; b:array[1..20]of integer; c:array[1..20]of integer; i,j,s,s2,masa,masb,masc:integer; begin randomize; masa:=random(20); masb:=random(20); j:=0; write('Массив A: '); for i:=1 to masa do begin a[i]:=random(100); inc(masc); c[masc]:=a[i]; write(a[i]:4); end; writeln; write('Массив B: '); for i:=1 to masb do begin b[i]:=random(100); inc(masc); c[masc]:=b[i]; write(b[i]:4); end; for i:=2 to masc do begin j:=i; while c[j]<c[j-1] do begin s:=c[j]; c[j]:=c[j-1]; c[j-1]:=s; dec(j); if j=1 then break; end; end; writeln; write('Массив C: '); for i:=1 to masc do write(c[i]:4); end. Проверить можно тут: http://pascalabc.net/WDE/ Спасибо большое. Племяшка говорит что препод не поверит, что она сама это написала)))) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 2 минуты назад, Windtalkers26 сказал: Спасибо большое. Племяшка говорит что препод не поверит, что она сама это написала)))) Да по сути тут ничего сложного нет, может кто упростит код, когда писал многое вспоминал, поэтому код оптимизировать есть куда =) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Windtalkers26 48 Опубликовано: 2 марта, 2017 Всё ровно спасибо) Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 1 минуту назад, Windtalkers26 сказал: Всё ровно спасибо) Пожалуйста.. Вспомнил паскаль =), уже лет 10 не писал на нем ничего. Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Flamingo 4 011 Опубликовано: 2 марта, 2017 11 минуту назад, Startwar сказал: Да по сути тут ничего сложного нет, может кто упростит код, когда писал многое вспоминал, поэтому код оптимизировать есть куда =) Есть ошибки. Незначительные 1 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
MaDMaX 16 796 Опубликовано: 2 марта, 2017 4 минуты назад, Flamingo сказал: Есть ошибки. Незначительные 1 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 4 минуты назад, Flamingo сказал: Есть ошибки. Незначительные Возможно, очень давно не писал на паскале =) Буду рад если оптимизируешь. Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Flamingo 4 011 Опубликовано: 2 марта, 2017 6 минут назад, MaDMaX сказал: 6 минут назад, Startwar сказал: Возможно, очень давно не писал на паскале =) Буду рад если оптимизируешь. Не в оптимизации дело. Если массивы a и b определяешь не более 20 элементов, то для с надо зарезервировать 40. И для masc нет первоначального присвоения значения, от какого значения будет будет наращиваться счетчик? И вообще я подумала,что задача на работу с динамическими массивами, а не статическими. А алгоритм сортировки не проверяла, лень PS. С Паскалем не имела дела очень давно, вы его тогда видимо только учить начинали 4 Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах
Startwar 2 316 Опубликовано: 2 марта, 2017 4 минуты назад, Flamingo сказал: Не в оптимизации дело. Если массивы a и b определяешь не более 20 элементов, то для с надо зарезервировать 40. Хм.. Странно, я вроде писал первоначально 40, потом видать когда затерлось восстанавливал и просто скопировал.. Иначе действительно если massa + massb будет больше 20 то вылетит с ошибкой Windtalkers26 это действительно ошибка.. Поделиться сообщением Ссылка на сообщение Поделиться на других сайтах