Задание 4.2. Правила ввода текста Запустите текстовый процессор, установленный на вашем компьютере.
Введите текст:
При вводе текста соседние слова отделяются одним пробелом. Знаки препинания (запятая, двоеточие, точка, восклицательный и вопросительный знаки) пишутся слитно с предшествующим словом и отделяются пробелом от следующего слова.

Кавычки и скобки пишутся слитно с соответствующими словами.

Тире выделяется пробелами с двух сторон.

Дефис пишется слитно с соединяемыми им словами.

Введите текст, обращая внимание на соблюдение соответствующих правил:
Тема «Правила ввода текста», гостиница «Малахит», шоколад «Алёнка», роман «Война и мир».

Этапы создания текстового документа: ввод, редактирование, форматирование.

Информация во Всемирной паутине организована в виде страниц (Web-страниц).

Всё-таки, Мамин-Сибиряк, жар-птица, северо-восток, Ростов-на-Дону, Нью-Йорк. Пришлось волей-неволей остаться здесь на ночь. Горя бояться — счастья не видать. Москва — огромный город, город-страна. Конец XVII века — первая половина XIX века.
ответьте​

# Python 3.X

from random import shuffle

doors = ['dragon', 'water', 'empty']
lives = 3
score = 0

while True:
    choice = int(input('Введите номер двери (1, 2 или 3): '))
    shuffle(doors)
    score += 100
    if doors[choice - 1] == 'dragon':
        print('Вы сражались с драконом и потеряли жизнь.')
        lives -= 1
    elif doors[choice - 1] == 'water':
        print('Вы выпили живой воды и получили жизнь.')
        lives += 1
    else:
        print('Ничего не произошло.')
    if lives == 0:
        print('Игра окончена. Ваш счет:', score)
        break

1.
const n=10;
var a:array[1..n] of integer;
i,max,min:integer;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
begin
a[i]:=random(51);
write(a[i]:4);
end;
writeln;
max:=a[1]; min:=a[1];
for i:=2 to n do
begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
end;
writeln('max = ',max,' min = ',min);
writeln(max,'-',min,' = ',max-min);
end.

Пример:
23 23 46 28 38 21 46 5 19 27
max = 46 min = 5
46-5 = 41

2.
const n=10;
var a:array[1..n] of integer;
i:integer; 
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
 begin
 a[i]:=random(21);
 write(a[i]:3);
 end;
writeln;
writeln('Числа >5:');
for i:=1 to n do
 if a[i]>5 then write(a[i]:3);
end.

Пример:
Массив A:
 7 0 12 5 1 1 13 15 13 20
Числа >5:
 7 12 13 15 13 20

3.
const n=10; 
var a:array[1..n] of integer;
i:integer; p:real;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
 begin
 a[i]:=random(11);
 write(a[i]:3);
 end;
writeln;
p:=1;
for i:=1 to n do
 if a[i]<>0 then p:=p*a[i];
write('p = ',p);
end.

Пример:
Массив A:
 5 7 1 6 0 0 4 1 5 0
p = 4200