90*4000*8(бит в 1 символе)/2400=1200 секунд
1200/60=20 минут
30-20=10 минут
Ответ:10 минут
И кстати, а почему нельзя отдыхать, пока файлы копируются?) Может, задача с подвохом?)))
Var
s: string := 'Мышки ели шишки.';
a: set of char := ['а'..'я', 'ё'];
n, i: integer;
begin
s := LowerCase(s) + ' ';
for i := 2 to Length(s) do
if not (s[i] in a) and (s[i-1]='и') then
n := n + 1;
writeln(n);
<span>end.</span>
Var a,b:integer;
x:real;
begin
writeln ('введи числа a и b');
readln (a,b);
if a=0 then writeln ('No')
else begin
x:=b/(-1*a);
writeln (x:5:2);
end;
end.
Я не представляю чисто с математической точки зрения, как тут может быть несколько вариантов, а уж тем более множество. Если приведешь примеры, я перепишу код
#!/usr/bin/python
# -*- coding: utf-8 -*-
print u"введите число"
a = str(input())
for i in a:<span>
</span><span> if i+i in a:</span><span>
print i+i, u"содержит"</span>