Переведём число в 2 СС. нацело оно не переведется, поэтому переводим до стольки знаков после запятой, чтобы их общее кол-во вместе с целой частью было =24; 24,29 в 10 СС= 11000,0100101000111101011 в 2 СС р=5 Мр=1000101 0100|0101|1100|0010|0101|0001|1110|1011 4 5 C 2 5 1 E B ответ:45С21ЕВ
Если, например, Х = 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.
24,29 в 10 СС= 11000,0100101000111101011 в 2 СС
р=5
Мр=1000101
0100|0101|1100|0010|0101|0001|1110|1011
4 5 C 2 5 1 E B
ответ:45С21ЕВ