Var n,a,h,m,s:integer;
begin
writeln('Введите кол-во дней');
read(n);
if n>1 then begin
writeln('В ', n ,' сутках:');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд')
end;
if n=1 then begin
writeln('В ',n,' дне');
writeln(n*24,' часа');
writeln(n*24*60,' минут');
writeln(n*24*60*60,' секунд');
end;<span>
end.
</span>
854 секунд
здесь ограничение на мин ввод 20 сим
# Код на ruby 2.2.3p173
def zadanie(lineal_array, x, y)
k = 0
lineal_array.each {|element|
k = k + 1 if element < x or element > y
}
return k
end
# Примеры применения
p zadanie([1, 2, 3, 4, 5], 2, 3)
В 32 768 битах сожержится 4 килобайта: 32768 / 8 / 1024=4