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

@Pieman · Регистрация: 19.10.2012

Студворк — интернет-сервис помощи студентам

Понадобилось написать программку на паскале, но совершенно забыл как это делать на нём

@Siyatel · 16.11.2012, 21:39

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
const {блок начальных констант}
stolb=20;
strok=20;
type{ блок описания твоих типов}
aatt=array[1..stolb] of real;{ описание строки}
bbtt=array[1..strok] of aatt;{ описание матрицы}
cctt=array[1..stolb;1..strok] of real{ описание матрицы другое}
 
var { блок описания переменных}
aa:bbtt; { переменная аа типа bbtt}
i,j,a,b:integer;{ описание целочисленных переменных}
sum1,sum2,sum:real;
 
begin { блок выполнения программы}
 
{ считывание значений элементов матрицы в переменную aa}
 
 
sum1:=0;{сумма всех положительных столбцов}
sum2:=0;{ сумма элементов главной диагонали}
for i=1 to stolb do
   begin sum:=0;
    for j=1 to strok do
begin
sum:=sum+aa[i,j];
if i=j then sum2:=sum2+aa[i,j];
end;
if sum>0 then sum1:=sum1+sum;
   end;
 
 
end.

@Pieman · 16.11.2012, 22:00 **[ТС]**

а что за тип aa:bbtt; ? Никогда такой не встречал!

@Siyatel · 16.11.2012, 22:03

это произвольный тип. Твой, пользовательский. этот тип описан в примере в строке номер 6.
В блоке type описывается.
просто лично мне нравится в конце моих типов ставить символы tt/
Ты можешь назвать его как угодно.

Новые блоги и статьи Все статьи Все блоги /
Оптимизация производительности Express.js бэкенда Reangularity 23.05.2025 Express. js заслуженно остаётся одним из самых популярных инструментов для создания бэкенда, но даже он не застрахован от проблем с производительностью. Многие разработчики сталкиваются с ситуацией,. . .	Продвинутая обработка данных с LINQ в C# stackOverflow 23.05.2025 LINQ (Language Integrated Query) — это фундаментальное изменение парадигмы работы с данными в C#. Простые запросы Where и Select знакомы любому разработчику, но настоящая мощь LINQ раскрывается в. . .	Инфраструктура PKI и сертификатов безопасности Mr. Docker 23.05.2025 PKI (Public Key Infrastructure) — это невидимый фундамент цифрового доверия, без которого современный интернет просто рассыпался бы как карточный домик. За этой аббревиатурой скрывается целый. . .	Аутентификация OAuth в Python py-thonny 22.05.2025 OAuth (Open Authorization) — это целый стандарт для делегированного доступа. Звучит занудно? Давайте проще: OAuth позволяет приложениям получать доступ к информации пользователя на сторонних сервисах. . .	Хеширование и соль паролей в веб-приложениях C# stackOverflow 22.05.2025 Когда-то в начале своей карьеры я тоже грешил простейшими подходами к хранению паролей – MD5-хеширование казалось верхом защиты. Но технологии не стоят на месте, вычислительные мощьности растут, и. . .
Генераторы Python для эффективной обработки данных AI_Generated 21.05.2025 В Python существует инструмент настолько мощный и в то же время недооценённый, что я часто сравниваю его с тайным оружием в арсенале программиста. Речь идёт о генераторах — одной из самых элегантных. . .	Чем заменить Swagger в .NET WebAPI stackOverflow 21.05.2025 Если вы создавали Web API на . NET в последние несколько лет, то наверняка сталкивались с зелёным интерфейсом Swagger UI. Этот инструмент стал практически стандартом для документирования и. . .	Использование Linq2Db в проектах C# .NET UnmanagedCoder 21.05.2025 Среди множества претендентов на корону "идеального ORM" особое место занимает Linq2Db — микро-ORM, балансирующий между мощью полноценных инструментов и легковесностью ручного написания SQL. Что. . .	Реализация Domain-Driven Design с Java Javaican 20.05.2025 DDD — это настоящий спасательный круг для проектов со сложной бизнес-логикой. Подход, предложенный Эриком Эвансом, позволяет создавать элегантные решения, которые точно отражают реальную предметную. . .	Возможности и нововведения C# 14 stackOverflow 20.05.2025 Выход версии C# 14, который ожидается вместе с . NET 10, приносит ряд интересных нововведений, действительно упрощающих жизнь разработчиков. Вы уже хотите опробовать эти новшества? Не проблема! Просто. . .

@Pieman 0 / 0 / 0 Регистрация: 19.10.2012 Сообщений: 29

	Найти общую сумму элементов тех столбцов матрицы, сумма элементов в каждом из которых положительна и сумму элеметов главной диагонали 16.11.2012, 20:36. Показов 3132. Ответов 3 Метки нет (Все метки) Понадобилось написать программку на паскале, но совершенно забыл как это делать на нём 0

@Pieman 0 / 0 / 0 Регистрация: 19.10.2012 Сообщений: 29
	16.11.2012, 22:00 [ТС]
	а что за тип aa:bbtt; ? Никогда такой не встречал! 0

@Siyatel 2 / 2 / 0 Регистрация: 27.07.2012 Сообщений: 18
	16.11.2012, 22:03
	это произвольный тип. Твой, пользовательский. этот тип описан в примере в строке номер 6. В блоке type описывается. просто лично мне нравится в конце моих типов ставить символы tt/ Ты можешь назвать его как угодно. 1

Опции темы