Пример 1 решения задачи 2 «парная линейная регрессия»

Begin

Else

Repeat

Begin

Begin

Else

Else

End

Begin

Begin

Begin

Begin

Var

Var

Type

МОСКВА 2016

Курс: Алгоритмизация вычислений

Ответы на основные вопросы человека

Библейская философия истории дает ответы на три основных вопроса человека. Прежде всего, на вопрос, откуда мы появились, Библия отвечает, что мы были сотворены суверенным всемогущим Богом. Во-вторых, на вопрос, почему мы здесь находимся, Библия отвечает, что цель нашей жизни – познать Бога лично. А затем активно служить Ему как члены и свидетели Его вселенского царства.

Наконец, библейский ответ на третий вопрос о том, куда мы идем, имеет две грани. Прежде всего, как мир и как род человеческий, мы направляемся к окончательному поражению сатаны и его царства и к славной победе Бога и Его царства. Во-вторых, как отдельные личности, мы направляемся либо к вечному благословению, либо к вечному наказанию, в зависимости от того, к какому царству мы принадлежим. Все мы родились в этот мир как подданные царства сатаны, и приговор божественного осуждения этого царства ожидает своего исполнения. Но так как Иисус Христос уплатил полную цену за наш грех, мы можем стать подданными царства Бога, если мы поверим в Него как нашего личного Спасителя (Кол 1:13,14; Рим 8:1). Поскольку правление Бога, суверенного Царя и Судьи, не может быть свергнуто, «нерадеть о толиком великом спасении» - это настоящее безумие (Евр 2:1-3; Пс 2:10-12).

[1] Царь Ахашверош (Ксеркс), отец Артаксеркса, упоминается в Ездр 4:6. Этот же царь – герой книги Есфирь – муж Есфири (в русском синодальном переводе Библии в книге Есфирь переводчиками он назван Артаксерксом (примечание переводчика).

Раздел	Макс. оценка	Итог. оценка	ОТЧЁТ по лабораторной работе № 6 Студент: Текунов Даниил Игоревич Группа: БИВ-165 Вариант: 161 Руководитель: Хруслова Д. В. Оценка: ________
Правильность алгоритма
Оформление
Тесты
Вопросы
Доп. задание

Оглавление

Задание. 3

Листинг. 4

Тесты.. 7

Задание

1.Выделить из каждой строки и напечатать подстроки ограниченные с обеих сторон одной или несколькими латинскими буквами;

2.Среди выделенных подстрок найти самую короткую подстроку (если таких подстрок несколько, выбирается первая из них)

3.Вставить цифру 0 после каждой цифры 1

4.

program Lab6;

str = array [1..250] of string;

latinL: string;

s, s1: str;

i, d, k1, j, j1, k: integer;

m: real;

procedure zad1(var s1: str; s: str; latinL: string; var k1: integer; k: integer);

j, j1, i:integer;

k1:=0;

for i:=1 to k do

j:=1;

j1:=1;

while j<=length(s[i]) do

if (pos(s[i][j],latinL)>0) then

if j<>1 then

if j<>j1 then

inc(k1);

s1[k1]:=copy(s[i],j1,j-j1);

end;

while (j<=length(s[i])) and (pos(s[i][j],latinL)>0) do

inc(j);

j1:=j;

if j<>1 then

inc(j)

if pos(s[i][1],latinL)=0 then

while (j<=length(s[i])) and (pos(s[i][j],latinL)=0) do

inc(j);

j1:=j;

end;

end;

writeln ('Введите количество строк');

readln (m);

if (m<=0) or (m>15) or (m<>round(m)) then

writeln ('Неверное значение параметра k. Пожалуйста, повторно введите k, где k>0');

read(m);

until (m>0) and (m<15) and (m=round(m));

k:=round (m);

writeln('Введите строки');

for i:=1 to k do

readln (s[i]);

latinL:='abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ';

zad1(s1, s, latinL, k1, k);

writeln ('Задание №1');

if k1=0 then

writeln('Подстрок нет')

writeln('Подстроки:');

for i:=1 to k1 do

writeln(s1[i]);

end;

end.

В таблице задания к теме 2 даны значения величин X и Y. Требуется составить уравнение линейной регрессии, наитии коэффициент корреляции и оценить качество линейной модели.

Дата добавления: 2017-01-13