Если, например, Х = 5 сек, то за 5 сек Флэш выпустит 2 молнии, а за 10 сек - 3. То есть количество молний A = int(Y : X) + 1, где Y = N*60 + M - количество отведенного времени в секундах. Вся суть программы: X = Input (input.txt, X); // Принимаем секунды из файла, пишем в переменную X N = Input (input.txt, N); // Принимаем минуты из файла, пишем в переменную N M = Input (input.txt, M); // Принимаем секунды из файла, пишем в переменную M Y = N*60 + M; // Вычисляем отведенное время в секундах A = int(Y : X) + 1; // Вычисляем количество молний Output (A, output.txt); // Выводим его в файл.
//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016) begin var n:=ReadInteger('Размер массива: '); var a:=ArrRandom(n); a.Println; var p:=1; for var i:=n-4 to n-1 do begin p:=p*a[i]; end; println(p); end.
const k = 100; var a:array [1..k] of integer; i,p,n:integer; begin p:=1; readln(n); for i:=1 to n do begin a[i]:=random(21)-10; write(a[i]:4); if i>n-4 then p:=p*a[i]; end; writeln; writeln(p); end.
2^1024= 100000 2(cc) - 1 и 1024 нуля
2^1000 = 100000 (2cc) - 1 и 1000 нулей
2^1000 -1 = 111...111 (2cc) - 1000 штук единиц
2^1024 + (2^1000 - 1) = 100...000 +111111 (2cc) =100...111...111 (2cc) -
- всего 1024 разряда (цифр 1 и 0)
1024 (общее количество цифр) - 1001 (единиц) =23 (нуля) <---ответ