Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 01.11.2011
Сообщений: 11

Дополнить условие в программе.

01.11.2011, 22:04. Показов 876. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Для заданной квадратной матрицы сформировать одномерный массив из её диагональных элементов. Найти след. матрицы, суммируя элементы одномерного массива. Преобразовать исходную матрицу по правилу: чётные строки разделить на полученное значение, нечетные оставить без изменения.
В 17 строке складываются элементы главной диагонали матрицы, не могу придумать как сделать чтобы программа считала главную и побочную диагонали.
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
25
26
27
28
29
30
31
32
program xonix;
var a:array[1..256,1..256] of real;
    b:array[1..256] of real;
    sl:real;
    i,j,n:integer;
begin
writeln('Please, enter, how long will be matrix');
readln(n);
for i:=1 to n do
  for j:=1 to n do
   begin
   write('a[',i,',',j,']=');
   readln(a[i,j]);
  end;
 for i:=1 to n do
   b[i]:=a[i,i];
 for i:=1 downto n do
   b[i]:=b[i]+a[i,i];
sl:=0;
for i:=1 to n do
 sl:=sl+b[i];
writeln('Sled:',sl);
for i:=1 to n do
 for j:=1 to n do
  if (i mod 2=0) then a[i,j]:=a[i,j]/sl;
for i:=1 to n do
 begin
  for j:=1 to n do
   write(a[i,j]:6:2);
   writeln;
 end;
end.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
01.11.2011, 22:04
Ответы с готовыми решениями:

Дополнить макрос так, чтобы данные с первой книги не собирались, если есть условие в виде даты
Добрый вечер! Помогите, пожалуйста, решить один вопрос. Буду рад абсолютно любой помощи! Есть 2...

Не отрабатывает условие в программе
int C,D,temp; float y; const int A=2,B=3; temp=exp(3*log(D)); cout<<"Vvedite znachenie...

Не выполняется условие в программе
Ввожу значение 1 или 2, но при этом не заходит в блок if char Buffer = {0}, *b = Buffer; ......

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

В программе игнорируется условие
Искал в интернете схожие задачи/коды, находил подобные, но с другим синтаксисом.Так как я только...

Не выполняется условие в программе
#include <stdio.h> #include <stdlib.h> #include <conio.h> int main() { float x1; char...

Не срабатывает условие в программе
сделал программу по заданию: Дан файл, содержащий некоторый текст. Оставить в этом файле только те...

Условие в тестовой программе
Здравствуйте. Подскажите пожалуйста как сделать так что при выполнение if ball*1>=3 или if...

Не работает второе условие в программе
Второе условие просто не считывается, при проверке пишет, что точка не принадлежит графику, хотя...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru