Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

написать программу на паскаль:

10-11 класс

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

Gned 14 янв. 2017 г., 0:04:16 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Ilmirgalaxys
14 янв. 2017 г., 0:45:31 (7 лет назад)

Если имеется в виду произведение наибольших в каждой строке элементов, то тогда так:
var
   i,j,p:integer;
   max:array[1..5]of integer;
   a:array[1..5,1..5]of integer;
begin
p:=1;
for i:=1 to 5 do
  for j:=1 to 5 do
    a[i,j]:=random(-10,10);
a[1,1]:=random(-10,-1);
for i:=1 to 5 do
  begin
  for j:=1 to 5 do
    begin
    write(a[i,j]:4);
    if a[i,j]>max[i] then max[i]:=a[i,j];
    end;
  p:=p*max[i];
  writeln;
  end;
writeln('P=',p);
end.

Ответить

Другие вопросы из категории

Дан одномерный массив из 10 следующих элементов:

3,0,1,7,4,5,6,2,9,0.

Как изменится порядок элементов после выполнения фрагмента Паскаль-программы описанного ниже?

...
for i:=1 to 5 do
begin
t:=a[i];
a[i]:=a[11-i];
a[11-i]:=t;
end;
...

Читайте также

написать программу на Assembler

добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.

задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов

Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.

заранее огромное спасибо всем!

Помогите написать программу в паскале. Задание:На плоскости даны 2 точки А (х1; у2) и В (х2; у2), определить какая из них находится дальше от начала коо

рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу

Помогите написать программу по Информатике! Найти произведение двузначных нечетных чисел, кратных

13.

Нужно написать программу на цикле с предусловием, на Паскале.

Пожалуста!!!!!!!!!!!!!!!!!!!!!!ОЧ срочно!!!!!! Написать программу на паскале, которая вводит

массив из N целых чисел и выводит на экран номера отрицательных элементов и сами эти элементы. Протестировать программу для следующих массивов:

а) 3 5 -2 0 -6 -8 1

б) -1 -2 -3 0 -1 2 3

массивы должны вводися вручную а не рандомно.



Вы находитесь на странице вопроса "написать программу на паскаль:", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.