1 / 1 / 0
Регистрация: 22.03.2015
Сообщений: 27

Переменной присвоить значение 1, если выполняется условие

09.06.2015, 12:38. Показов 1610. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Задана матрица A. Напишите программу, которая переменной L присваивает значение 1, если число положительных элементов под главной диагональю больше числа положительных элементов над главной диагональю, и значение 0 в противном случае.:he lp:
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
09.06.2015, 12:38
Ответы с готовыми решениями:

Присвоить переменной х значение 0, если ее начальное значение принадлежало интервалу (0;2).
Присвоить переменной х значение 0, если ее начальное значение принадлежало интервалу (0;2).

Присвоить переменной х значение 0, если ее начальное значение принадлежало интервалу (0,2).
Присвоить переменной х значение 0, если ее начальное значение принадлежало интервалу (0,2).

Логической переменной b присвоить значение true, если числа x и y равны и значение false иначе
логической переменной b присвоить значение true если числа x и y равны и значение false иначе

2
8 / 8 / 2
Регистрация: 18.02.2013
Сообщений: 56
09.06.2015, 14:11
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program matrix;
uses
crt;
var
//Матрица задана:
A: [0..10,0..10] of integer;
down,up:integer;
l:byte;
begin
clrscr;
//заполнение матрицы сам пиши)) ) мб она у тебя вообще из файла берется
up:=0;
down:=0;
l:=0;
//Цикл перебора всех элементов:
for i:=0 to 10 do
for j:=0 to 10 do
if A[i,j] > 0 then
if i>j then
inc(up)
else
inc(down);
1
Модератор
10236 / 5524 / 3373
Регистрация: 17.08.2012
Сообщений: 16,885
11.06.2015, 20:14
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
const m = 6;
var a: array [1..m, 1..m] of integer;
    col, row, over, above, L: integer;
begin
  randomize;
  over := 0;
  above := 0;
  writeln('Source matrix:');
  for row := 1 to m do
    begin
      for col := 1 to m do
        begin
          a[row, col] := -99 + random(199);
          write(a[row, col]:4);
          if a[row, col] > 0
            then if col > row then inc(over)
            else if row > col then inc(above)
        end;
      writeln
    end;
  L := ord(above > over);
  write('L = ', L);
  readln
end.

Не по теме:

Сообщение было перенесено из дубля этой темы, дубль был удалён.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
11.06.2015, 20:14
Помогаю со студенческими работами здесь

Логической переменной р присвоить значение true, если целое n (n>1) - простое число, и значение false - иначе
Логической переменной р присвоить значение true, если целое n (n>1) - простое число, и значение false - иначе. Хорошо знаю, что где то...

Переменной t присвоить значение истина, если максимальный элемент...
переменной t присвоить значение истина , если максимальный элемент одномерного массива единственный и не превосходит наперед заданного...

Если слово in входит в строку то переменной t присвоить значение true
Если в строку длиной 80 символов входит слово in то логический переменной t присвоить значение true

Переменной t присвоить значение true, если элементы массива упорядочены по возрастанию
#1 Дан произвольный массив из 40 элементов. Переменой t присвоить значение true , если элементы массива упорядочены по возрастанию. ...

Переменной t присвоить значение true, если тройка y, m, d образует правильную дату
Переменные y, m, d имеют смысл год, месяц, день. Переменной t присвоить значение true, если тройка y, m, d образует правильную дату, и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

Новые блоги и статьи
Непрерывная интеграция для пакета Python
Mr. Docker 22.06.2025
Было 4 часа утра пятницы, когда я выпустил новую версию нашей внутренней библиотеки для обработки данных. Релиз 0. 5. 2 содержал небольшой фикс для обработки дат в ISO формате, что может пойти не так?. . .
Продвинутый ETL на C# из OLTP БД в хранилище
stackOverflow 22.06.2025
Работая в сфере корпоративной аналитики, я постоянно сталкиваюсь с одним и тем же - нужны чистые, структурированные и, главное, свежие данные. Без них современные аналитические системы, машинное. . .
Мастер-класс по микросервисам на Node.js
Reangularity 21.06.2025
Node. js стал одной из самых популярных платформ для микросервисной архитектуры не случайно. Его неблокирующая однопоточная модель и событийно-ориентированный подход делают его идеальным для. . .
Управление Arduino из WPF приложения
Wired 21.06.2025
Зачем вообще связывать Arduino с WPF-приложением? Казалось бы, у Arduino есть собственная среда разработки, своя экосистема, свои способы управления. Однако при создании серьезных проектов. . .
Звёздная пыль
kumehtar 20.06.2025
Я просто это себе представляю: как создавался этот мир. Как энергия слипалась в маленькие частички. Как они собирались в первые звёзды, как во вселенной впервые появился Свет. Как эти звёзды. . .
Создание нейросети с PyTorch
AI_Generated 19.06.2025
Ключевое преимущество PyTorch — его питоновская натура. В отличие от TensorFlow, который изначально был построен как статический вычислительный граф, PyTorch предлагает динамический подход. Это. . .
JWT аутентификация в ASP.NET Core
UnmanagedCoder 18.06.2025
Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .
Краткий курс по С#
aaLeXAA 18.06.2025
Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .
50 самых полезных примеров кода Python для частых задач
py-thonny 17.06.2025
Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .
C# и продвинутые приемы работы с БД
stackOverflow 17.06.2025
Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru