Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Цикл с параметром https://www.cyberforum.ru/ pascal/ thread68859.html
Помогите пожалуйста!! Нужно написать прогу на Паскале. Буду очень благодарен! Вот задание: Нужно вычислить 1/1!+1/2!+...-1/10!
Pascal число начинается и заканчивается одной цифрой
Помогите дописать... задание :Найти сумму цифр числа. (это записано) Правильно ли, что число начинается и заканчивается одной цифрой. - помогите написать эту часть задачи... program chislo;...
Pascal Разработка алгоритмов и программ с использованием указателей https://www.cyberforum.ru/ pascal/ thread68847.html
Найти сумму кубов всех отрицательных элементов массива A={a}, удовлетворяющих условию a>=c*d. Использовать динамическое выделение памяти.
Pascal Счастливый билетик https://www.cyberforum.ru/ pascal/ thread68839.html
Вывести шестизначные номера „счастливых” билетов, сумма цифр которых равняется 22. Четырехзначное число является „счастливым”, если сумма двух первых цифр равняется сумме последних двух.
Pascal Файл
Дан файл, который содержит список студентов. Вывести на экран тех студентов которые из города и 2 по предметам
Pascal Разработка алгоритмов и программ с анализом организации данных Постройте очередь из 7-ти символов - ‘k’, ‘l’,‘m’, ‘n’, ‘o’, ‘p’, ‘r’. Выведите из очереди три символа ‘l’, ‘m’, ‘r’ и добавьте в конец очереди символ ‘s’. Результаты как промежуточных, так и... https://www.cyberforum.ru/ pascal/ thread68826.html
Pascal Разработка алгоритмов и программ с подключением модуля GRAPH https://www.cyberforum.ru/ pascal/ thread68825.html
Создайте программу преобразования движущегося графического изображения прямоугольника из позитивной формы (черным цветом на белом фоне) в негативную форму и наоборот.
Pascal Определить номер строки и номер столбца матрицы
Определить номер строки и номер столбца матрици Х(5, 6), на пересечении которых находиться наибольший по абсолютной величине элемент. ПЛИЗЗЗЗ ПОМОГИТЕ????
Pascal Найти сумму положительных элементов матрицы, находящихся в строках без нулевых элементов https://www.cyberforum.ru/ pascal/ thread68809.html
Вычислить сумму тех положительных элементов двумерного массива А, которые стоят в строках, не содержащих нулевых элементов
Pascal Дорешать. https://www.cyberforum.ru/ pascal/ thread68807.html
препод говорит программа написна не полностью. помогиие пож. говорит нет ввода. я не понимаю. program variant 28; var a:array of integer; s,i,j: integer; begin for i:=1 to 5 do begin s:=0 for...
вычеркнить из слова х те буквы, которые встречаются в слове z Pascal
Спасибо и еще одну задачу помоги пожалуйста.вычеркнить из слова х те буквы, которые встречаются в слове z
Pascal Последовательность Помогите с заданием. Произвести следующую обработку 15 целых чисел: найти количество четных чисел, а нечетные числа, входящие в диапазон возвести в квадрат. Задание нужно сделать не использую... https://www.cyberforum.ru/ pascal/ thread68804.html
Почетный модератор
64069 / 47481 / 32732
Регистрация: 18.05.2008
Сообщений: 115,185
30.11.2009, 15:49 0

Преобразование массива, создание массива из элементов строк матрицы. - Pascal - Ответ 386293

30.11.2009, 15:49. Показов 1664. Ответов 3
Метки (Все метки)

Ответ

2.
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
uses crt;
const n=7;
var a:array[1..n,1..n] of integer;
    b:array[1..n] of integer;
    i,j,k:byte;
begin
clrscr;
writeln('Исходная матрица:');
for i:=1 to n do
 begin
   for j:=1 to n do
    begin
     a[i,j]:=random(10)-7;
     {можете поменять диапазон или сделать ввод с клавы}
     write(a[i,j]:4);
    end;
   writeln;
 end;
writeln;
{находим первое положительное в каждой строке}
for i:=1 to n do
 begin
  k:=0;
  for j:=1 to n do
  if a[i,j]>0 then
   begin
    k:=1;
    b[i]:=a[i,j];
    break;
   end;
  if k=0 then b[i]:=-1;
 end;
writeln('Массив первых положительных в строках:');
for i:=1 to n do
write(b[i],' ');
readln
end.


Вернуться к обсуждению:
Преобразование массива, создание массива из элементов строк матрицы. Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.11.2009, 15:49
Готовые ответы и решения:

Не выходит преобразование матрицы типа int в char и вывод строк массива
Если указываю массив например 5 на 5, то то всё отлично преобразует, но в последнем цикле нужно...

Преобразование одномерного массива длиной n*m элементов в прямоугольную матрицу из n строк и m столбцов.
Написать программу для преобразования одномерного массив длиной n*m элементов в виде...

Формирование для каждой матрицы массива, состоящего из минимальных элементов строк матрицы
Помогите, пожалуйста, найти ошибку в программе. Выводит неверно элементы. interface uses...

Создание нового массива из элементов квадратной матрицы
Дан массив A(X,X) - то есть квадратная матрица. Сформировать массив S из суммы тех элементов...

3
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.11.2009, 15:49

Прием массива строк и создание массива символов
Добрый день, форумчане Проясните, пожалуйста, следующий момент: Мне нужно создать класс Text. В...

Преобразование массива. Изменение элементов массива
Дан массив размера N, все элементы которого, кроме последнего, упорядочены по возрастанию. Сделать...

Посчитать сумму элементов матрицы, где номера столбцов и строк взяты из массива
Есть массив way, в котором z элементов. Первому элементу дан индекс k, второму l=k+1. Так же дана...

Разработайте программу ввода элементов массива по столбцам и вывода элементов массива в виде матрицы на экран
14,Разработайте программу ввода элементов массива по столбцам и вывода элементов массива в виде...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.