Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Технологии > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 18.12.2009, 18:51   #1
Nitriyc
Пользователь
 
Регистрация: 18.11.2009
Сообщений: 20
По умолчанию Динамическая структура

вот программа нужно переделать её в динамическу структуру
program lab_6;
const n=5;
type matr=array [1..n,1..n] of integer;
procedure Input(var a:matr);
var i,j:integer;
begin
for i:=1 to n do
for j:=1 to n do
read(a[i,j]);
end;
procedure Change(var a:matr; var f:byte);
var i,j:byte;
x:integer;
Begin
f:=1;
for i:=1 to n do
begin
for j:=1 to n do
begin
if (a[i,j]>=0) then
begin
if i<j then
begin
x:=a[j,i];
a[j,i]:=a[i,j];
a[i,j]:=x;
end;
end
else f:=0;
end;
end;
end;
procedure Output(const a:matr);
var i, j:integer;
begin
for i:=1 to n do
begin
for j:=1 to n do
write(a[i,j],' ');
writeln;
writeln;
end;
end;
var a:matr;
f:byte;
begin
Input(a);
Change(a,f);
if f=1 then Output(a)
else writeln('est otricatelnoe chislo');
readln;
readln;
End.
вот задание:Дана квадратная матрица порядка n(n=5). Если в данной матрице a нет отрицательных элементов, то транспонировать её, иначе выдать сообщение.
Заранее спасибо
Nitriyc вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Динамическая строка Сергей089 C++ Builder 15 10.12.2009 21:32
Задача: Динамическая структура данных на Си++ Клеом Помощь студентам 2 26.10.2009 18:17
динамическая структура o4arova6ka90 Помощь студентам 0 17.10.2009 14:05
Динамическая шапка dr.Chas HTML и CSS 1 03.09.2009 08:25
Динамическая переменная kezman Общие вопросы C/C++ 1 29.07.2008 13:49


03:43.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.