За 5 минут Катя набрала 100 симв.
Дальше они набирают одновременно, и Маша догоняет Катю на 20 символов
каждую минуту.
Разрыв в 100 символов она догонит за 5 минут.
Ответ: через 10 минут после того, как начала печатать Катя, они напечатают
<span>одинаковое количество - 200 символов.</span>
Var x,y: real;
begin
write('x = ');
readln(x);
if (x>=0)and(x<=1) then y:=x*x-x
else y:=x*x-sin(pi*x*x);
writeln('y = ',y:6:4);
end.
Пример:
<span>x = 1.5
y = 1.5429</span>
Var a:array[1..100] of integer;
I,c,n:integer;
Begin
Readln(n);
For i:=1 to n do
Begin
Read(a[i]);
Write(a[i],' ');
If a[i]<0
Then c:=c+1;
End;
Writeln('кол-во отриц.=',c);
End.
Индексы 0, 1, 2, 3, 4, 5...
Ответ: A
101110, 101111. В десятичной эти числа равны 46 и 47.