Объяснение:
1. Пусть у нас есть файл 'file.pas'
2. Получим случайное число при оператора random. К примеру, мы получили двузначное число 34.
3. Представим его литерной величиной '34'
4. При операции "склейка" получим новое имя файла:
'34'+'file.pas' = '34file.pas'
Листинг программы:
uses Crt;
var n: integer;
S1, S2, S3 : String;
begin
ClrScr;
Randomize;
S1:='file.pas';
n:= 10+random(90);
Str (n,S2);
S3:=S2 + S1;
Writeln (S1, ' ----> ',S3);
ReadLn;
end.
Реализация:
