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

Составьте программу вычисления произведения элементов матрицы B(N,N),кратных 3. Турбо паскаль

5-9 класс

Chorosovatn 05 окт. 2013 г., 17:05:39 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Asmatveev44
05 окт. 2013 г., 19:20:36 (10 лет назад)

Program JolieWErnAje;
uses crt;
const n=10;
var
  a:array[1..n,1..n] of integer;
  i,j: integer;
  tp: integer;
begin
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  writeln();
  tp:=1;
  randomize;
  for i:=1 to n do
    begin
      for j:=1 to n do
        begin
          a[i,j]:= random(20)+1; {заполняем массив}
          write(a[i,j]:4);
          if a[i,j] mod 3 = 0 then tp:=tp*a[i,j];
        end;
      writeln();
    end;
  writeln();
  writeln('Произведение элементов, кратных 3, равно ',tp)
end.

Ответить

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

помогите пожалуста

Надо чтобы когда я нажимаю на кнопку button у меня программа переходила на следующюю форму мне нужен программный код Делфи7

для передачи по каналу связи сообщения состоящего только из символов а б в и г используется посимвольное кодирование а-0 б-1 в-10 г-11 через

канал связи передаётся сообщение гаваб можно ли при таком кодировании однозначно расшифровать полученное сообщение сколько всего способов расшифровки существует

1Кто присваевает файлу собственное имя

а-програма
б user
в-операциооная система
г- винчестер
2 Выберите верную запись имени файла
а- письмо.dog
б-письмо:doc
в-письмо.doc
г-"письмо".doc

ПОМОГИТЕ, ПОЖАЛУЙСТА!!

Задано четырехзначное число. Проверить, что в заданном числе произведение 2-х первых цифр равно произведению двух последних цифр.

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

мне ооочень срочно нужно!!! пожалуйста помогите!!!!!!!!помогите решить 2 задачи по Ивт в Паскале: 1)составить программу вычисления в массиве A(

N) произведения нечетных элементов 2)Составьте программу вычисления в массиве B(N) максимального среди отрицательных элементов и его номера. заранее огромное спасибо! очень нужно!

1) Составьте программу вычисления в массиве A(N) суммы всех чисел, кратных 3. 2) Составьте программу вычисления в массиве B(8) суммы отрицательных

элементов. 3) Составьте программу вычисления среднего арифметического элементов массива. Пожалуйста.. очень надо!

1. Составьте блок-схему алгоритма и программу вычисления площади треугольника по трем сторонам. 2. Составьте программу вычисления объема, площади полной

поверхности, суммы ребер прямоугольного параллелепипеда. 3. Составьте программу вычисления диагоналей ромба по стороне и углу.

1.Составьте программу, выводящую на экран все двухзначные числа, у которых сумма цифр равна 8.

2.Составьте программу вычисления количества трёхзначных чисел палиндромов ( чисел, которые читаются одинаково слева направо и справа налево).
3.Найти двухзначные числа, которые делятся на сумму своих цифр
4.Составьте программу вывода количества трёхзначных чисел, у которых цифры упорядочены строго по убыванию.
РЕБЯТА СРОЧНО!!!!!!!!!!!



Вы находитесь на странице вопроса "Составьте программу вычисления произведения элементов матрицы B(N,N),кратных 3. Турбо паскаль", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.