Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.11.2016, 21:34   #1
NikOlga
Новичок
Джуниор
 
Регистрация: 30.11.2016
Сообщений: 1
По умолчанию Составить программу на Паскаль ABC произведение всех неотрицательных элементов двумерного массива

Найти произведение всех неотрицательных элементов двумерного массива

спасибо

Программу на Паскале АВС

Последний раз редактировалось Serge_Bliznykov; 30.11.2016 в 21:52.
NikOlga вне форума Ответить с цитированием
Старый 04.12.2016, 11:40   #2
newerow1989
Я самый любопытный
Участник клуба
 
Аватар для newerow1989
 
Регистрация: 24.07.2012
Сообщений: 1,949
По умолчанию

Код:
var p:array[1..10,1..10] of integer;
    i,j,pr:integer;
begin
   Randomize;
   For i:=1 to 10 do
   begin
      For j:=1 to 10 do
      begin
         p[i,j]:=-10+Random(15);
         Write(p[i,j],'  ');
      end;
      Writeln;
   end;
   Writeln;
   pr:=1;
   For i:=1 to 10 do
      For j:=1 to 10 do
         If p[i,j]>0 then
            pr:=pr*p[i,j];
   Writeln(pr);
   Readln;
end.
С запрограммированным приветом, Неверов Евгений!
Сайт: http://newerow1989.ru
[Паскаль] [Delphi]
newerow1989 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Составить на языке Турбо Паскаль программу обработки строк и двумерного массива. Wenia Паскаль, Turbo Pascal, PascalABC.NET 11 30.11.2012 09:47
Ассемблер - определить произведение всех элементов массива N(20) KateMM Помощь студентам 1 18.04.2012 13:20
Составить программу сравнения любых двух элементов двумерного массива 7even Паскаль, Turbo Pascal, PascalABC.NET 1 10.04.2012 19:41
Произведение элементов массива [Паскаль] Анна22 Помощь студентам 2 06.12.2010 23:57