4.3.1 блочная ( ИЗ 6 ) (1272624)

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла

10

ИЗ №6 Вар 16 (N*+1) // 4.3.1

I) Внешняя спецификация программы

1) Задача: Если сумма элементов последнего столбца матрицы А положительна, присвоить каждому из элементов Х₁, Х₂, ..., Х₅ значение среднего арифметического соответствующей по номеру строки матрицы.

2) Состав данных:

3) Входная форма:

4) Выходная форма:

5/6) При декомпозиции задачи выделим следующие подпрограммы:

1 - Найти сумму элементов последнего столбца матрицы

2 - Найти среднее арифметическое каждой строки матрицы

7) Вычислительных аномалий нет.

8) Тесты:

Внутренняя спецификация программы

Подзадача 1: Найти сумму элементов последнего столбца матрицы

function FS(M,I,SP)

Подзадача 2: Найти среднее арифметическое каждой строки матрицы

procedure FX(M,SR)

I I) Алгоритмы

function FS(M,I,SP)

procedure FX(M,SR)

Основной алгоритм

Определить сумму элементов последнего столбца матрицы

Начало

Ввод: {А}

Определить S

по проц. FS (A)

S>0

Вывод по обр.3

Определить {Х}

по проц. FX (A)

Вывод {Х} по обр.2

Конец

Определить среднее арифметическое каждой строки матрицы

III) Паскаль программа

P

ОБРАТИ ВНИМАНИЕ

rogram IZ_6;

TYPE matr=array [1..5,1..5] of real;

vec=array [1..5] of real;

v ar A:matr;

X:vec;

S:real;

i,j:integer;

fp1,fp2:text;

function FS(var M:matr):real;

var i:integer;

SP:real;

b

ОБРАТИ ВНИМАНИЕ

egin

SP:=0;

For i:=1 to 5 do

SP:=SP+M[i,5];

FS:=SP;

end;

procedure FX(var M:matr; var SR:vec);

var i,j:integer;

SS:real;

begin

f

ОБРАТИ ВНИМАНИЕ

or i:=1 to 5 do

begin

SS:=0;

for j:=1 to 5 do

SS:=SS+M[i,j];

SR[i]:=SS/5;

end;

end;

B EGIN

assign(fp1,'TEST*.pas'); { * - номер теста }

assign(fp2,'OUTTEST*.pas'); { * - номер теста }

reset(fp1);

rewrite(fp2);

for i:=1 to 5 do

for j:=1 to 5 do

read(fp1,A[i,j]);

writeln(fp2,' ':2,'RESULTS');

S:=FS(A);

if S>0 then

begin

FX(A,X);

for i:=1 to 5 do

write(fp2,' ',X[i]);

writeln(fp2);

end

else

writeln(fp2,'Сумма элементов последнего столбца отрицательна');

Close(fp1);

Close(fp2);

END.

Характеристики

Тип файла документ

Документы такого типа открываются такими программами, как Microsoft Office Word на компьютерах Windows, Apple Pages на компьютерах Mac, Open Office - бесплатная альтернатива на различных платформах, в том числе Linux. Наиболее простым и современным решением будут Google документы, так как открываются онлайн без скачивания прямо в браузере на любой платформе. Существуют российские качественные аналоги, например от Яндекса.

Будьте внимательны на мобильных устройствах, так как там используются упрощённый функционал даже в официальном приложении от Microsoft, поэтому для просмотра скачивайте PDF-версию. А если нужно редактировать файл, то используйте оригинальный файл.

Файлы такого типа обычно разбиты на страницы, а текст может быть форматированным (жирный, курсив, выбор шрифта, таблицы и т.п.), а также в него можно добавлять изображения. Формат идеально подходит для рефератов, докладов и РПЗ курсовых проектов, которые необходимо распечатать. Кстати перед печатью также сохраняйте файл в PDF, так как принтер может начудить со шрифтами.

Список файлов ответов (шпаргалок)