-
надо написать короткое эссе на тему: я и ты границы нашей свободы буквально на 15 предложений. помогите пожалуйста
-
Предмет:
Обществознание -
Автор:
yellerwsxw - 6 лет назад
-
Ответы 5
-
спасибо большое)))
-
Автор:
deshawn - 6 лет назад
-
0
-
-
а можете помочь еще с этим вопросом
-
Автор:
dolce - 6 лет назад
-
0
-
-
надо написать короткое эссе на тему: назначение человека: борьба или подчинение страсти по философии помогите пожалуйста
-
Автор:
quincybenton - 6 лет назад
-
0
-
-
Задайте пожалуйста этот в опрос отдельно. Ответ с лишком еикий для комментариев.
-
Автор:
kendal - 6 лет назад
-
0
-
-
Общество привыкло к той свободе, которую им дали, поэтому изменились границы свободы и несвободы, и теперь людей гораздо проще чем-то смутить. Мы все легко внушаемы чужими мыслями, мы можем долго считать себя правым и внушать свою правду другим и те в свою очередь будут распространять эти же слова прочим людям. Эта цепочка может быть весьма длинной и плодовитой. Это оказывает существенное влияние на общество в целом. Таким образом получается, что границы свободы нарушаются, в данном случае именно в границах слова. Чужие мысли идут дальше, чем стоило бы. Эту ситуацию конечно можно рассматривать как с хорошей стороны, так ис плохой, но факт в том, что граница все же рушится. В нашей жизни есть место еще для влияния с точки зрения наших поступков. Иногда мы подражаем кому то, а иногда и нам подражает кто то, это и есть граница свободы, мы не обладаем полной волей и от того мы сами берем себя в рамки.
-
Автор:
hughkidd - 6 лет назад
-
0
-
-
Добавить свой ответ
Еще вопросы
-
Перевести код из Pascal в C, C++ или С#:
program PrResh;
///////////////Подключение графического модуля///////////////
var
n, m, r: Integer;
A: array [1..100, 1..100] of Real;
o: char;
w: text;
///////////////Процедура ввода значений///////////////
procedure Vvod(n, m: integer);
var
i, j: integer;
begin
assign (w, 'PrResh.txt');
rewrite (w);
for i := 1 to n do
begin
for j := 1 to m do
begin
Write('A[', i, ',', j, ']=');
Read(A[i, j]);
end;
end;
writeln('Матрица:');
writeln(w, 'Матрица:');
for i := 1 to n do
begin
for j := 1 to m do
begin
write(A[i, j], ' ');
write(w, A[i, j], ' ');
end;
writeln;
writeln(w);
end;
writeln(w);
close(w);
end;
///////////////Критерий Сэвиджа///////////////
procedure Sevi(n, m: integer);
var
B: array [1..100] of real;
Q: array [1..100, 1..100] of real;
i, j: integer;
c: real;
begin
assign (w, 'PrResh.txt');
append(w);
writeln(w, 'Критерий Сэвиджа.');
writeln(w, 'Наибольшее значение каждого столбца.');
for j := 1 to n do
begin
c := A[1, j];
for i := 1 to m do
begin
if A[i, j] > c then
c := A[i, j];
end;
B[j] := c;
writeln(w, 'Значение ', j, ' столбца = ', B[j]);
end;
writeln(w, 'Вычтем из наибольшего значения столбца, каждое значение столбца.');
writeln(w, 'Сформируем новую матрицу из полученных значений.');
for i := 1 to m do
begin
for j := 1 to n do
begin
Q[i, j] := B[j] - A[i, j];
write(w, Q[i,j], ' ');
end;
writeln(w);
end;
writeln(w, 'Наибольшее значение каждой строки.');
for i := 1 to n do
begin
c := Q[i, 1];
for j := 1 to m do
begin
if Q[i, j] > c then
c := Q[i, j];
end;
B[i] := c;
writeln(w, 'Значение ', i, ' строки = ', B[i]);
end;
for i := 1 to n do
begin
Writeln('B[', i, ']=', B[i]);
end;
c := B[1];
for i := 1 to n do
begin
if B[i] < c then
c := B[i];
end;
writeln('Ответ:');
writeln(w, 'Ответ:');
for i := 1 to n do
begin
if B[i] = c then
begin
writeln('B[', i, ']=', B[i]);
writeln(w, 'E', i,'=', B[i]);
end;
end;
close(w);
end;
///////////////Критерий Гермейера///////////////
procedure Ger(n, m: integer);
var
i, j : integer;
u:real;
V1, V2: array [1..100, 1..100] of real;
q, B: array [1..100] of real;
c: real;
begin
assign (w, 'PrResh.txt');
append(w);
writeln(w, 'Критерий Гермейера.');
Writeln('Для решения необходимы сведенья о вероятности принятия каждого решения.');
Writeln(w, 'Вероятности принятия решения:');
Readln (u);
for j := 1 to m do
begin
q[j]:=u;
//Write('q', j, '=');
//Readln(q[j]);
Write(w, 'q', j, ' = ', q[j], ' ');
end;
writeln(w);
c := A[1, 1];
for i := 1 to n do
begin
for j := 1 to m do
begin
if A[i, j] > c then
c := A[i, j];
end;
end;
writeln(w, 'Наибольшее значение в матрице = ', c);
c := c + 1;
writeln(w, 'Необходимо из каждого элемента матрицы вычесть ', c);
writeln(w, 'Полученная матрица:');
for i := 1 to n do
begin
for j := 1 to m do
begin
V1[i, j] := A[i, j] - c;
write(w, V1[i,j], ' ');
V2[i, j] := V1[i, j] * q[j];
end;
writeln(w);
end;
writeln(w, 'Умножаем каждый элемент матрицы на соответствующую вероятность.');
writeln(w, 'Выбираем наименьший результат каждой строки.');
for i := 1 to n do
begin
c := V2[i, 1];
for j := 1 to m do
begin
if V2[i, j] < c then
c := V2[i, j];
end;
B[i] := c;
writeln(w, 'Значение ', i, ' строки = ', B[i]);
end;
for i := 1 to n do
begin
Writeln('B[', i, ']=', B[i]);
end;
c := B[1];
for i := 1 to n do
begin
if B[i] > c then
c := B[i];
end;
writeln('Ответ:');
writeln(w, 'Ответ:');
for i := 1 to n do
begin
if B[i] = c then
begin
writeln('B[', i, ']=', B[i]);
writeln(w, 'E', i,'=', B[i]);
end;
end;
close(w);
end;
///////////////Начальный ввод в прогамму///////////////
begin
assign (w, 'PrResh.txt');
rewrite (w);
write(w, 'Матрица:');
close(w);
Write('Введите количество строк матрицы ');
Readln(n);
Write('Введите количество столбцов матрицы ');
Readln(m);
Vvod(n, m);
o := 'y';
while o <> 'n' do
begin
if o = 'y' then
begin
writeln('');
writeln('Методы выбора:');
writeln('1. Критерий Сэвиджа;');
writeln('2. Критерий Гермейера;');
Write('Введите номер метода: ');
Readln(r);
case r of
1: Sevi(n, m);
2: Ger(n, m);
3: o := 'n';
end;
end;
if o = 'y' then
begin
Writeln('Решить пример другим методом?');
Writeln('Да - y! Нет - n!');
Read(o);
end;
//clrscr;
end;
end.
-
Предмет:
Информатика -
Автор:
ezekiel - 6 лет назад
-
Ответов:
1 -
Смотреть
-
-
при заимодействии 58.5г бензола с 120г. Брома образуется бромбензол. Найдите его массу.
Формула
m(Br2)=120г
m(C6H6)=58.5г
Найти: m(C6H6Br)-
Предмет:
Химия -
Автор:
haiden1vrk - 6 лет назад
-
Ответов:
1 -
Смотреть
-
-
диктант на тему раз (рас)
-
Предмет:
Русский язык -
Автор:
inmaculadaburke - 6 лет назад
-
Ответов:
2 -
Смотреть
-
-
Как пишется: два да пять будет семь, через тире или нет?
-
Предмет:
Русский язык -
Автор:
sophieq1zv - 6 лет назад
-
Ответов:
2 -
Смотреть
-
Топ пользователей
-
Fedoseewa27
35934 -
Askold
2792 -
Pikachu
2228 -
hobbesbowers
2116 -
kaylynnbarron676
1818 -
女fei
1240 -
yulia-kaplina
1158 -
Poinntt
946 -
Bars
930 -
Queenmagic18
770
How much to ban the user?
1 hour
1 day
100 years