задача на двумерный массив, подскажите Опции

[Dimon4ic]

подскажите умные люди пожалуйста как решить
Задачка такова характера:
Ввести с клавиатуры целочисленный двумерный массив размером N * M элементов (N. M <=4). Вывести его на экран в виде таблицы. Вычислить сумму окаймляющих элементов (т.е. элементов первой и последней строки и первого и последнего столбца).

Сообщение отредактировано: Dimon4ic - 10.06.2009 19:35

[Dimon4ic]

спасибо кто пытался, больше помощи ненада, ответ нашёлся, кому интересна, смотрите:
program test;
uses
crt;
const
n = 3;
m = 4;
var
arr : array[1..n, 1..m] of integer;
i, j, sum : integer;
begin
clrscr;

textColor(14);
writeln('Matrica imeet vid: ');
for i := 1 to n do
begin
for j := 1 to m do
begin
arr[i, j] := random(10) + 1;
write(arr[i, j]:3);
end;
writeln;
writeln;
end;

sum := 0;
for i := 1 to m do
begin
inc(sum, arr[1, i]);
inc(sum, arr[n, i]);
end;
for i := 2 to n - 1 do
begin
inc(sum, arr[i, 1]);
inc(sum, arr[i, m]);
end;

textColor(4);
writeln;
write('Summa sostavila: ', sum);

readln;
end.

[sheka]

спасибо кто пытался, больше помощи ненада, ответ нашёлся, кому интересна, смотрите:

to админы:
есть ли место на форуме где можна использовать нецензурную лексику?

мне интересна : чем тебе мое решение не угодило? согласен, сумму можно искать и другими методами нежели я.
но насколько я знаю ввод и вывод двухмерного массива делаются однозначно.
где в твоем решении( которое ты, скорее всего, взял у кого-то, а не решил сам) ответ на поставленный вопрос: "Ввести с клавиатуры целочисленный двумерный массив" ?
"Вывести его на экран" ты зделал, но при таком оформлении вопросов, можно для нахождения суммы спокойно обойтись и вообще без массива.
и кода меньше, и памяти будет меньше брать!

кстати, об оформлении. эту задачу надо решать обязательно с использованием graph, там есть разные виды шрифтов и их размеров!!!

PS. понял, вопросы отменяются - решил не сам, а похвастался чужим решением!

Сообщение отредактировано: sheka - 12.06.2009 0:21

[Lapp]

есть ли место на форуме где можна использовать нецензурную лексику?

Нету.

Sheka, не обижайся. На уродов не обижаются. Ну, не могут они даже бегин/энд поставить, бедняги..

Напоминаю: ты всегда можешь понизить репутацию пользователю в подобной ситуации. Некая замена нецензурщине - хотя. может, не всегда эквивалентная.

ээ.. или для этого нужно иметь 100 сообщений? не помню..