Elly Опубликовано 29 октября, 2011 Поделиться Опубликовано 29 октября, 2011 генерируется рандомная матрица размерностью н. потом отыскивают отрицательные значения по всей матрице(цикл фор), после чего проверяют на главной ли они диагонали. если нет, то смотрят где они: выше или ниже диагонали. И соответственно прибавляют счетчик в нужную переменную. вроде бы всё просто и понятно. Ссылка на комментарий Поделиться на другие сайты Поделиться
Росляев Опубликовано 8 ноября, 2011 Автор Поделиться Опубликовано 8 ноября, 2011 Вот еще задачка: Задание из предыдущей лабораторной работы оформить с использованием функций и процедур. Нахождение основных значений оформить через функцию, а вывод на печать – через процедуру. Ссылка на комментарий Поделиться на другие сайты Поделиться
Paddington Опубликовано 8 ноября, 2011 Поделиться Опубликовано 8 ноября, 2011 (изменено) Как вариант: : Program R; Const n=3; Type mas=array[1..n,1..n] of real; Var a:mas; i,j:byte; pod,nad:integer; Function mass(var c:mas; var nad, pod:integer):integer; begin pod:=0; nad:=0; for i:=1 to n do for j:=1 to n do begin a[i,j]:=random(10000)-5000+random; if a[i,j]<0 then if not(i=j) then if i<j then inc(nad) else inc(pod); end; mass:=nad; end; Procedure vyvod(var c:mas); begin for i:=1 to n do begin for j:=1 to n do Write(c[i,j]:9:3, ' '); WriteLn; end; end; begin randomize; nad:=mass(a, nad, pod); vyvod(a); WriteLn('Количество отрицательных элементов над главной диагональю: ', nad); WriteLn('Количество отрицательных элементов под главной диагональю: ', pod); end. Изменено 8 ноября, 2011 пользователем Paddington Ссылка на комментарий Поделиться на другие сайты Поделиться
Росляев Опубликовано 21 ноября, 2011 Автор Поделиться Опубликовано 21 ноября, 2011 Может еще задачку решите? Циклически заполняя строки выводить на экран свои данные: фамилию и имя. Вывод осуществляется дальше, если на запрос пользователь нажимает клавишу «Y» и прекращается по нажатии клавиши «N». Установить эффекты мерцания и изменения цвета при каждом новом выводе. Ссылка на комментарий Поделиться на другие сайты Поделиться
Росляев Опубликовано 25 ноября, 2011 Автор Поделиться Опубликовано 25 ноября, 2011 Вот еще парочку заданий, кому интересно) 1.Описать, используя структуру данных запись, почтовую сортировку (город, улица, дом, квартира, кому, ценность). Составить программу, определяющую: 1) сколько посылок отправлено в г.Москву; 2) сколько отправлено посылок ценностью выше 10 рублей; 3) кому отправлено более 1 посылки. 2.Дана непустая последовательность слов из строчных русских букв; между соседними словами - запятая, за последним словом - точка. Напечатать в алфавитном порядке: все гласные буквы, которые входят в каждое слово. Ссылка на комментарий Поделиться на другие сайты Поделиться
taurus3991 Опубликовано 5 декабря, 2011 Поделиться Опубликовано 5 декабря, 2011 Дана квадратная вещественная матрица размерности n. Построить матрицу вектор (одномерный массив) элементы которой соответственно равны произведению элементов каждого столбца. оформить с использованием функций и процедур. Нахождение основных значений оформить через функцию, а вывод на печать – через процедурую Ссылка на комментарий Поделиться на другие сайты Поделиться
Рекомендуемые сообщения
Пожалуйста, войдите, чтобы комментировать
Вы сможете оставить комментарий после входа в
Войти