30 . как переименовать файл, добавив к его названию случайное число?
pascal

Объяснение:

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.

Реализация: