В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
ира1029
ира1029
24.06.2020 06:55 •  Информатика

Переделайте этот текст в текст делового стиля речи. Заранее мая - особый день в жизни и истории нашего государства. В этот день, 74 года назад, в 2 часа 10 минут по радио был прочитан Акт о полной военной капитуляции фашистской Германии и Указ Президиума Верховного Совета СССР об объявлении 9 мая Днем всенародного торжества – Праздником Победы.

Вторая мировая и Великая Отечественная войны были самыми тяжелыми из всех воин, пережитых человечеством. По масштабам ведения боевых действий, участию людских масс, применению огромного количества техники, напряжению и ожесточенности они превосходили все войны За победу над фашизмом пришлось заплатить высокую цену. Миллионы граждан нашей страны пали в боях и погибли в концлагерях.

Отдавая дань уважения всем борцам против фашизма, следует признать, что главная заслуга в разгроме гитлеровской Германии принадлежит СССР. Историческое и мировое значение победы СССР в Великой Отечественной войне заключается не только в освобождении своей территории и сохранении целостности своей Родины, но и в освобождении народов Европы от фашистского порабощения. Именно под ударами советских войск рухнула оборонительная стратегия вермахта и развалился блок фашистских государств. По своим масштабам советско-германский фронт в течение всей войны являлся главным. Именно здесь вермахт потерял более 73% личного состава, до 75% танков и артиллерийских орудий, более 75% авиации.

Больше всего (600 тысяч) советских солдат и офицеров погибло и похоронено на территории современной Польши, более 140 тысяч – в Чехии и Словакии, 26 тысяч – в Австрии. Многие народы Восточной и Южной Европы с войск Советской армии были избавлены от фашистского гнета.

Штурм Берлина — являлся завершающей частью Берлинской наступательной операции 1945 года, в ходе которой Красная Армия овладела столицей нацистской Германии и победоносно завершила Великую Отечественную войну и Вторую мировую войну в Европе.

Мы отдаем дань глубокого уважения и благодарности каждому, кто воевал на передовой, кто защищал страну от фашистских захватчиков, кто поддерживал фронтовиков своей работой в тылу.
Низкий поклон и самые горячие и искренние слова благодарности ветеранам Великой Отечественной войны!
Мы гордимся героизмом и мужеством всего Советского народа!
В новой России День Победы остался Великим праздником. В этот день граждане всех возрастов без принуждения нескончаемым потоком направляются к памятникам и мемориалам, возлагают к ним цветы и венки. На площадях и концертных площадках проходят выступления известных и самодеятельных артистов, массовые гулянья длятся с утра и до поздней ночи.
По традиции в городах-героях проходят военные парады. А по вечерам небо загорается от праздничного салюта и современных фейерверков. Новым атрибутом 9 Мая стала георгиевская ленточка — символ героизма, мужества и отваги. Впервые ленточки раздали в 2005 году. С тех пор накануне праздника их бесплатно рас в общественных местах, магазинах, учебных учреждениях. Каждый участник с гордостью носит на груди полосатую ленточку, отдавая дань памяти погибшим за Победу и мир на земле.

Показать ответ
Ответ:
qq302894
qq302894
19.06.2020 11:57
1. Вот так сейчас решают подобные задачи:

// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
  Writeln(Range(1,100).Select(i->sin(i)*cos(i)).Where(x->x<>0).Average)
end.

Тестовое решение:
-0.00136006072493969

2. А вот так учат писать это же школьные учителя:

// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
var
  m:array[1..100] of real;
  i,k:integer;
  s:real;

begin
  s:=0;
  k:=0;
  for i:=1 to 100 do begin
    m[i]:=sin(i)*cos(i);
    if m[i]<>0 then begin
      s:=s+m[i];
      k:=k+1
      end
    end;
  Writeln(s/k)
end.

Тестовое решение:
-0.00136006072493969
0,0(0 оценок)
Ответ:
linakabak12345
linakabak12345
17.09.2021 08:34
//Вот программа, которая кодирует слова в системах счисления от 2 до 10
//Первый ввод - число, второй - система счисления
//Pascal ABC.NET v3.0

var
 a,i,b,r,n,j,bug:integer;
 s,se,slo,slof:string;

procedure preob(var a,b,n:integer; var se:string);
 begin
  repeat
   b:=a mod n;
   a:=a div n;
   str(b,se);
   s+=se;
  until (a<=n-1);
 end;

begin
readln(slo);
readln(n);
for j:=1 to length(slo) do
begin;
a:=ord(slo[j]);
preob(a,b,n,se);
str(a,se);
s+=se;
for i:=1 to length(s) div 2 do
begin;
se:=s[i];
s[i]:=s[length(s)-i+1];
s[length(s)-i+1]:=se[1];
end;
write(s,'-');
slof:=slof+s;
delete(s,1,length(s));
end;
end.

//Слово Программа она кодирует как 11001111-11110000-11101110-11100011-11110000-11100000-11101100-11101100-11100000-
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота