Program zz;
var i,n,m:integer;
begin
readln(n,m);
for i:=1 to n do
write('?') ;
for i:=1 to m do
write('!') ;
end.<span>
</span>
Ответ:
Почистите диск от лишних файлов (Либо увы переустанови игру в другой раздел диска, а лучше вообще на другой диск)
Объяснение:
Попробуй для начала перезапустить стим, и запустить игру, если не помогло попробуй решение из ответа
<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)</span>
begin
var a:=Arr(BigInteger(ReadInteger('x->'))); var sum:=BigInteger(a[0]);
for var i:=1 to ReadInteger('n->')-1 do begin a:=a+arr(sqr(a[i-1])); sum+=a[i]; end;
a.Println; sum.Println;
end.
Пример:
x-> 4
n-> 5
4 16 256 65536 4294967296
4295033108
Комунікаційний пристрій, швидкість передавання даних становить 612000 біт/с, передавав повідомлення протягом 16 с.
1. Визначити в кілобайтах довжину двійкового коду цього повідомлення.
2. Скільки сторінок тексту має це повідомлення, якщо на кожній сторінці міститься 40 рядків тексту по 64 символи? Один символ тексту кодується 1 байтом.