//Pascal ABC.NET v3.1 сборка 1172
var
n: real;
begin
read(n);
writeln(n, ' суток=', n * 1440, ' минут');
writeln(n, ' минут=', n * 60, ' секунд');
end.
Пример ввода:
12
Пример вывода:
12 суток=17280 минут
12 минут=720 секунд
Var sum:real;
begin
for var i:=1 to 10 do sum:=sum+cos(i);
print ('s =', sum);
end.
61 это 110110 110001
87 это 111000 110111
А чтобы не было проблем -
Вот ссылка: https://decodeit.ru/binary/
Вот на изображении вроде оно
Звездочка будет иметь 11 символов