Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Turbo Pascal Вычислить сумму ряда с точностью эпсилон https://www.cyberforum.ru/ turbo-pascal/ thread227037.html Используя оператор цикла с постусловием, вычислить сумму ряда с точностью (эпсилон)=10^(-3) (уравнение ниже)	Turbo Pascal Определить попадание точки в заштрихованную область С клавиатуры вводятся два числа X и Y. Написать программу,определяющую попала ли точка с координатами(x,y) внутрь заштрихованной области(рисунок ниже)
Turbo Pascal Используя оператор цикла с параметром, протабулировать функцию с шагом dx=0,1.Найти и напечатать так же минимальное, максимальное и среднее арифметиче Используя оператор цикла с параметром, протабулировать функцию с шагом dx=0,1.Найти и напечатать так же минимальное, максимальное и среднее арифметическое полученных значений функции. Вычисление значения функции оформить в виде программы.формула ниже....а,да ещё x>=-1 и x<=1 https://www.cyberforum.ru/ turbo-pascal/ thread227030.html	Turbo Pascal Нахождение суммы ряда тут куча однотипных задач, помогите сделать хоть одну, остальные сам разберусь https://www.cyberforum.ru/ turbo-pascal/ thread227026.html
Сформировать запись WORK Turbo Pascal Сформировать запись WORK , содержащую информацию о работниках компании: фамилия, количество отработанных им часов за неделю , размер базовой зарплаты. Используя сформированную запись , вывести на экран и записать в файл ведомость выплаты недельной зарплаты работникам компании, содержащей сведения ФИО работника, его базовой зарплате, сумме выплачиваемых налогов (подоходный налог – 5 %,...	Turbo Pascal Вычисление количества элементов матрицы, больших 1 и меньших 5 https://www.cyberforum.ru/ turbo-pascal/ thread226997.html Пожалуйста помогите написать текст програмы: 1)Дана матрица размером 7*7. Составить программу для обработки исходной матрицы соответствии с индивидуальным заданием. В программе предусмотреть вывод на печать исходной и результирующей матриц в следующем виде: Исходная матрица: МАТРИЦА ПО СТРОКАМ ...
Turbo Pascal Моделирование Драйвера ЭЛТ монитора В ЭЛТ дисплее строчная развертка выполняется слева направо, при этом яркость каждого пикселя должна соответствовать элементу изображения. Каждый символ строится в стандартной матрице 9х14. Составить программу на паскле, которая моделирует работу драйвера ЭЛТ дисплея.Предусмотрите возможность ввода символа с клавиатуры. https://www.cyberforum.ru/ turbo-pascal/ thread226996.html	составить программу, которая моделирует работу драйвера ЭЛТ дисплея Turbo Pascal составить программу на Pascal, которая моделирует работу драйвера ЭЛТ дисплея
Turbo Pascal строковые функции Помогите создать три строковые функции , нужно для библиотеки в Тр... 1.Функция общего назначения функция-stuff(c1,c2:string;n1,n2:byte):string-возвращает строку символов,которая получена из строки c1 путём удаления позиций с n1 количеством n2, и вставки на это место подстроки c2. 2.Функция кодирования и декодирования функция-justleft(c1,c2:string):string-осуществляет циклическое... https://www.cyberforum.ru/ turbo-pascal/ thread226982.html	Turbo Pascal Найти остаток от деления целой части выражения https://www.cyberforum.ru/ turbo-pascal/ thread226973.html Товарищи!Очень нужна помощь! Составить болк схему и соответствующую ей программу решения задания пользуясь оператором CASE OF Задание:Найти остаток от деления целой части выражения sin(a+b)*0.5c на 4.Если остаток равен 0,то значение выражения нужно заменить на его целую часть,если остаток равен 1, то значение выражения следует заменить на его дробную часть.В остальных случаях оставить без...
Значение функции Turbo Pascal Вывести значения функции f(x)=X3 - 2x2 -x+2, превышающие среднее арифметическое значений функции,рассчитанной в заданных точках на интервале хпринадлежит , дельта х=0,5	Turbo Pascal Пожалуйста, проверьте, правильно ли написан код? https://www.cyberforum.ru/ turbo-pascal/ thread226945.html №1. program funksiya; var u, x, y, a: real; begin writeln ('Введите значения переменных x и y'); readln (x,y); if (abs(x)+abs(y)<=1) and (x>=0) then u:= (x+ y/(6+sqrt(sqr(x)+1))) / (abs(y-x)+sqrt(x)); if (abs(x)+abs(y)>1) and (x<>0) then u:= ( abs(x-y) * (1+sqr(sin(x+y))) ) / (2*x);

sano32

66 / 63 / 63

Регистрация: 15.12.2010

Сообщений: 150

11.01.2011, 11:57

Дана матрица целых чисел A(mxn).Вывести на экран строку и столбец, содержащие её наименьший элемент... - Turbo Pascal - Ответ 1277179

11.01.2011, 11:57. Показов 1231. Ответов 3

Метки (Все метки)

Ответ

вот держи поправил немного

Pascal

uses crt;
const n=4;m=4;
Var a:array[1..n,1..m] of integer;
min,i,j,b,c:integer;
Begin
clrscr;
randomize;
For i:=1 to n do
begin
For j:=1 to m do
begin
a[i,j]:=random(5);
write(a[I,j]:4);
end;
writeln;
end;
min:=a[1,1];
For i:=1 to n do
For j:=1 to m do
If min> a[i,j] then
min:=a[i,j];
Writeln('minim el = ',min);
for i:=1 to n do begin
    for j:=1 to m do begin
        if a[i,j]=min then begin
           writeln('stolbec');
           for b:=1 to m do writeln(a[b,j]:4);writeln;
           writeln('stroka');
           for c:=1 to n do write(a[i,c]:4);writeln;
        end;
    end;
end;
Readln;
End.

Вернуться к обсуждению:
Дана матрица целых чисел A(mxn).Вывести на экран строку и столбец, содержащие её наименьший элемент... Turbo Pascal

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

11.01.2011, 11:57

Готовые ответы и решения:

Дана матрица из целых чисел А размерности MxN. Упорядочить элементы матрицы так, чтобы
Дана матрица из целых чисел А размерности MxN. Упорядочить элементы матрицы так, чтобы А>=A, если...

Найти наименьший элемент списка целых чисел. Вывести на экран все множители этого элемента
Найти наименьший элемент списка целых чисел. Вывести на экран все множители этого элемента.

Дана матрица целых чисел размером 4x4. Повернуть матрицу на 90 градусов и вывести содержимое матрицы на экран
Дана матрица целых чисел размером 4x4. Повернуть матрицу на 90 градусов и вывести содержимое...

Дана матрица. Вывести k-ю строку и p-й столбец матрицы
Дана матрица. Вывести k-ю строку и p-й столбец матрицы.

	11.01.2011, 11:57

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

11.01.2011, 11:57

Помогаю со студенческими работами здесь

Дана матрица F 7,7. Вывести с каждого столбца наименьший элемент в textbox1
Дана матрица F 7,7. Вывести с каждого столбца наименьший элемент в textbox1.

Ввести одномерный массив из 7 целых чисел с клавиатуры и вывести его на экран. Найти его наименьший элемент
вывести одномерный массив из 7 целых чисел с клавиатуры и вывести его на экран. найти его...

Дана матрица целых чисел размером 4x4. Определите произведение минимальных элементов каждой строки матрицы. Результат вывести на экран монитор
Дана матрица целых чисел размером 4x4. Определите произведение минимальных элементов каждой...

Дана матрица целых чисел размером 4x4. Определите сумму элементов, расположенных выше главной диагонали. Результат вывести на экран монитора
Дана матрица целых чисел размером 4x4. Определите сумму элементов, расположенных выше главной...

Наверх