Версия для печати темы
Нажмите сюда для просмотра этой темы в обычном формате
Форум «Всё о Паскале» _ Задачи _ help
Автор: murakle 28.02.2007 3:02
помогите
решить на паскале
пожалуйста 
задача:
дана матрица а(10,15) ,зап случ числами в диапозоне от 0 до 29 Сформировать одномерный массив sum из сумм зн-ний эл-тов каждого столбца матрицы 
Автор: мисс_граффити 28.02.2007 3:34
1.
| ! | Заголовок темы должен быть информативным |
2. что пробовала делать?
даже заполнить сама не можешь?
Автор: T i m e 28.02.2007 4:44
Это же элементарно...
Код
randomize;
k := 0;
for i := 1 to 20 do
begin
x[i] = random(100)-50;
if (x[i] > 0) and (k < 10) then
begin
k := k + 1;
new[k] := x[i];
end;
end;
{new - новый массив из 10 положительных, если их вообще там 10 есть, и содержащий k элементов в противном случае}
Добавлено через 1 мин.
Сверху ответ на предыдущию тему, которую закрыли....
Добавлено через 44 сек.
Сверху мой ответ на предыдущию тему, которую закрыли....
Добавлено через 9 мин.
А вот код уже к этой задаче...
Код
randomize;
for j := 1 to 15 do begin
sum[j] := 0;
for i := 1 to 10 do
begin
a[i,j] := random(30);
sum[j] := a[i,j] + sum[j];
end;
end;