это быстро и бесплатно
Оформите заказ сейчас и получите скидку 100 руб.!
ID (номер) заказа
2288459
Ознакомительный фрагмент работы:
Задание
Дана матрица А(5,5)
Найти сумму положительных элементов над главной диагональю матрицы
Найти максимальный элемент среди отрицательных элементов 4-ой строки
Заменить найденный максимальный элемент в задании 2) на значение суммы.
Алена! Сделай, пожалуйста, Кр4 самостоятельно , используя мою лекцию по
Двумерным массивам, там достаточно примеров для твоего задания!
А так же разберись с условиями для диагоналей(гл. и поб.) это тоже есть в лекц. Я с вас спрашиваю, только тот материал, который давала.
То же касается и Лаб№5
Мне бы хотелось поставить тебе экзамен по выполненным работам и обойдемся без тестирования!
346329018478500444436518478500Блок-схема ? ???
20535904880610
Найти сумму положительныхВ блоках НЕ пишут операторы!!! И слова ввод и вывод- это вчерашний день, для них есть специальные блоки
Программа
const n = 5;
var A: array[1..n, 1..n] of real;
S, m: real;
i, j, ind: integer;
fr: text;
begin Assign(fr, 'C:\Users\sps\Desktop\1.txt');
Reset(fr);
for i := 1 to n do
begin for j := 1 to n do
begin Read(fr, a[i, j]);
write(a[i, j]:6:2, ' ');
end;
writeln;
end;
Close(fr);
S := 0;
for i := 1 to n do
for j := i+1 to n do
if a[i, j]>0 then
S := S + a[i, j];
writeln('s=', s:3:2);
ind :=1; Смысла нет!!!
m:=integer.MinValue;???
for i := 1 to n do
if (m < a[4, i]) and (a[4, i] < 0) then
begin ind := i;
m:=a[4, i];
end;
writeln('amax=', a[4,ind]:4:2,' ', ind);
a[4, ind] := S;
Writeln('new massiv A:');
for i := 1 to n do
begin for j := 1 to n do
write(a[i, j]:6:2, ' ');
writeln;
end;
end.
Сделайте индивидуальный заказ на нашем сервисе. Там эксперты помогают с учебой без посредников
Разместите задание – сайт бесплатно отправит его исполнителя, и они предложат цены.
Цены ниже, чем в агентствах и у конкурентов
Вы работаете с экспертами напрямую. Поэтому стоимость работ приятно вас удивит
Бесплатные доработки и консультации
Исполнитель внесет нужные правки в работу по вашему требованию без доплат. Корректировки в максимально короткие сроки
Гарантируем возврат
Если работа вас не устроит – мы вернем 100% суммы заказа
Техподдержка 7 дней в неделю
Наши менеджеры всегда на связи и оперативно решат любую проблему
Строгий отбор экспертов
К работе допускаются только проверенные специалисты с высшим образованием. Проверяем диплом на оценки «хорошо» и «отлично»
Работы выполняют эксперты в своём деле. Они ценят свою репутацию, поэтому результат выполненной работы гарантирован
Ежедневно эксперты готовы работать над 1000 заданиями. Контролируйте процесс написания работы в режиме онлайн
Тема: База данных питомника растений все в файле только исправить...
Курсовая, Базыданных
Срок сдачи к 27 апр.
Необходимо подготовить два доклада и две презентации по тема: «Ведение учета налоговых рисков» и «Стратегические решения и риск-менеджмент»
Доклад, Управление рисками
Срок сдачи к 24 апр.
Сделать курсовой проект и контрольную
Контрольная, Производство, ремонт и утилизация наземных транспортно-технологических средств
Срок сдачи к 1 мая
Лабораторная работа № 3 в программе Abaqus
Лабораторная, Компьютерный инжиниринг в обработке металлов давлением
Срок сдачи к 8 мая
Основания ограничений прав человека и гражданина в современном мире
Курсовая, Теория государства и права
Срок сдачи к 26 апр.
нужен буклет для проекта, сам проект готов. Тема: Источники заработка подростка Это 9 класс!
Другое, Обществознание
Срок сдачи к 24 апр.
Защита чести, достоинства и деловой репутации, страниц 25-30
Курсовая, Гражданское право
Срок сдачи к 26 апр.
Работа срочно теоретическая механика. тема: равновесие вала
Решение задач, Теоретическая механика
Срок сдачи к 23 апр.
Необходимо нарисовать диаграмму бизнес процесса
Презентация, Бизнес анализ, бизнес аналитика
Срок сдачи к 24 апр.
Методы учета личинок на рыбоводных заводах и нерестовых хозяйствах
Презентация, Пастбищная аквакультура
Срок сдачи к 27 апр.
Бизнес-анализ и совершенствование кадровой политики организации в сфере перевозок грузов транспортными средствами: экономический аспект
ВКР, Бизнес и финансы
Срок сдачи к 8 мая
Заполните форму и узнайте цену на индивидуальную работу!