Ответ:
Объяснение:
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.
Реализация:
1)<span>90Мбайт : 1.44Мбайт= 62.5=63 дискеты
4)</span>N1=32k1=200N2=16K2=250 1) 2)2i=N 2i=162i=32 2^4=162^5=32 i = 4i=5 200*5=1000 бит 4*250 = 1000 <span>ОТВЕТ: Тексты содержат одинаковое количество информации.
Постарайся понять)</span>
<em><u>// PascalABC.NET 3.2, сборка 1363 от 17.12.2016</u></em>
<em><u>// Внимание! Если программа не работает, обновите версию!</u></em>
begin
var sogl:='бвгджзйклмнпрстфхцчшщ';
var s:=readlnString('>').ToLower;
s.Where(c->Pos(c,sogl)>0).Distinct.Sorted.Println;
end.
<u>Пример</u>
> А роЗА УПалА На АПУ аЗора
злнпр
1)Если он этого не знал.
2)Если он все понял.(может быть такое, что сообщение написано на языке которое он не знает.)
3)Если он его прочитал и осмыслил.(может же просто пробежаться глазами
===== PascalABC.NET =====
begin
var a := ArrRandom(5, -1, 1);
foreach var x in a do
Write(x:3)
end.
