Надо переставить буквы чтобы получить слова -аскстеа, ппрсиау, секдиат, лфеш, чевистерн.

1)кассета 2)может папирус 3)дискета 4)флеш 5)винчестер

,r.UserQualitySetting=0

r.UserShadowSwitch=0

r.ShadowQuality=0

r.MobileContentScaleFactor=1.0

r.UserVulkanSetting=0

r.MobileHDR=0.0

r.Mobile.SceneColorFormat=0.0

r.UserHDRSetting=2

r.ACESStyle=2

r.UserMSAASetting=1

r.DefaultFeature.AntiAliasing=0.0

r.MobileMSAA=1.0

r.MSAACount=4.0

r.MaterialQualityLevel=0

r.Shadow.MaxCSMResolution=4

r.Shadow.CSM.MaxMobileCascades=2

r.Shadow.DistanceScale=0.1

r.Mobile.DynamicObjectShadow=1

r.DepthOfFieldQuality=0

r.RefractionQuality=0

r.=0.8

foliage.LODDistanceScale=1.0

foliage.MinLOD=0

r.DetailMode=0

r.MaxAnisotropy=1

r.Streaming.PoolSize=250

r.EmitterSpawnRateScale=0.75

r.ParticleLODBias=0

r.=0

diy.=1280

r.PUBGVersion=5

r.MobileSimpleShader=0

Var   f: text;   s: string;   max: string : = '';   begin   //в папке с программой должен быть файл "input.txt"     if fileexists('input.txt') then   begin     assign(f, 'input.txt');     reset(f);     while not eof(f) do     begin       readln(f, s);       if length(s) > length(max) then         max : = s;     end;     writeln('самая длинная строка в файле: ');     writeln(max);     close(f);   end   else     writeln('файл не найден'); end.