Главным персонажем повести Александра Грина является мечтательная и искренняя девушка Ассоль. Эта девушка - один из самых романтических персонажей русской литературы XX века.
Мать Ассоль рано умерла, и ее вырастил отец – моряк и ремесленник Лонгрен. Жители деревни их не любили. Девочка с ранних лет привыкла к одиночеству. Окружающие её отвергли, ей приходилось терпеть насмешки и оскорбления. Ассоль даже считали сумасшедшей. Она рассказала односельчанам историю о встрече с чародеем, который пророчил, что за ней в назначенный час приплывёт благородный принц на корабле с парусами алого цвета. После этого её прозвали корабельной Ассолью.
По своему складу героиня отличается яркой фантазией и искренним сердцем. Ассоль смотрит на мир широко распахнутыми глазами, она верит в свой идеал и никогда не откажется от мечты. У неё богатый внутренний мир и она умеет видеть глубокий смысл в простых вещах.
Ассоль образованна и любит читать. Ей присущи трудолюбие и любовь к природе. С растениями она общается, как с живыми существами, проявляет о них заботу. Когда же Ассоль подрастает, то становится по-настоящему красивой. Ей к лицу любые наряды. Она милая и обаятельная девушка. Её лицо чистое и светлое, как у ребёнка.
В душе Ассоль всегда лелеяла свою сокровенную мечту о корабле с алыми парусами. Даже отец девочки надеялся, что через время она выбросит из головы предсказание волшебника Эгля. Но самозабвенно грезить и игнорировать злые выпады односельчан укрепили дух девушки. В ее жизни настал час для чуда. Она повстречала того, кто понял её чуткую юную душу и осуществил сокровенную мечту. У берегов её родной деревни появилось судно с алыми парусами. Его построил для Ассоль капитан Грэй – благородный моряк, который узнал историю Ассоль и воплотил ее в действительность.
Героиня повести-феерии является настоящим символом такого вечного и достойного чувства, как вера. Её душу переполняют эмоции и переживания, она чувственная и открытая, но при этом обладает сильным и несгибаемым духом. Ассоль не отпустила свои грёзы. И поэтому они сбылись.
var
a : array[1..10] of word;
max : word;
begin
randomize;
for I : byte := 1 to 10 do
a[i] := random(1, 60000);
max := 0;
for I : byte := 1 to 10 do
if a[i] > max then max := a[i];
writeln(max*3);
end.
Объяснение:
Добавлю и объяснение. Алгоритм заполняет целочисленный массив из десяти элементов случайными числами. Возможны диапазон числе: от 1 до 60000. Затем в следующем цикле выискивается максимальное число, которое выдал генератор случайных чисел. В строке writeln выводится значение этого числа умноженное на три.
