Маша набирает текст со скоростью 40 символов в минуту, а катя-20 символов в минуту.через какое время девочки введут одинаковое количество символов, если катя начала набирать текст на 5 минут раньше маши ?

X- неизвестное кол-во минут минут маша 40*5 = 200 символов  и катя 20*10 = 200 символов через 10 минут от начала набора кати. или через 5 минут от начала набора маши.

За  5  минут  катя  набрала  100  символов. дальше  они  набирают  одновременно,  и  маша  догоняет  катю  на  20  символов  каждую  минуту. разрыв  в  100  символов  она  нагонит  за  5  минут. ответ:   через  10  минут  после  того,  как  начала  печатать  катя,  они  напечатают  одинаковое  количество  -  200  символов

Var    a,b,c,max: integer; begin   write ('введите а,b,c через пробел: ');   readln (a,b,c);   if a> b      then       if a> c          then begin max: =a; a: =-a end         else begin max: =c; c: =-c end     else       if b> c          then begin max: =b; b: =-b end         else begin max: =c; c: =-c end;         writeln;   writeln ('max = ',max);   writeln ('a = ',a,', b = ',b,', c = ',c); end. пример: введите а,b,c через пробел: -5 -2 -4 max = -2 a = -5, b = 2, c = -4

Var    n,count,i: integer;   a: array[1..100] of integer; begin     randomize;   write ('введите n: ');   readln (n);   count: =0;   for i: =1 to n do begin     a[i]: =random(1,10);     write (a[i],' '); // для наглядности. можно удалить     if (a[i]> 5) and (a[i] mod 2 =1)       then begin            a[i]: =7;           count: =count+1       end   end;   writeln;   for i: =1 to n do      write (a[i],' ');   writeln;   writeln ('count = ',count); end. пример: введите n: 10 1 9 6 9 9 4 8 8 9 6  1 7 6 7 7 4 8 8 7 6  count = 4