Внекой американской школе используют электронный журнал. хакер билл решил написать программу, которая подредактирует успеваемость его товарища по информатике.

10 ( 20 отдал)

формат входных данных
с клавиатуры вводится целое число n (2≤n≤30) — количество занятий; и список из n оценок. в некой американской школе используется 7-ми система оценок.
формат выходных данных
на экран требуется вывести исправленную последовательность. необходимо заменить все минимальные оценки друга билла на наиболее высокие из допустимых — больше минимальной, но не больше максимальной оценки (чтобы не застукали). остальные оценки не изменять.
гарантируется, что во входных данных существует хотя бы две различные оценки.

jrjkj rjkf_rjkjrjkf b yf rjkf[_rjkjrjkf

1)

program m; uses crt; var i,a,b,c,min: integer; beginclrscr; readln(a,b,c);

if a< min then min: =a; if b< min then min: =b; if c< min then min: =c; writeln('              ',min); readkey; end.

2)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a); min: =a; for i: =1 to 2 do                       

                                                                beginreadln(a); if a< min then min: =a;                                                             end; writeln(min);

readkey;

end.

3)

program m; uses crt; var i,a,b,c,min,d: integer; beginclrscr; readln(a,b,c); if a< b then b: =a; if c< a then b: =c; writeln(b); readkey; end.

сумму чисел один,два,три,четыре,пять разделить на разность чисел 10 и 7.равно пяти.

program risovalka;

  uses  crt,graphabc;

    var  xc,yc,r1,r2,rc,ro,n,i,x,y: integer;

  a: real;

    begin  repeatwrite('ykashi shislo otverstii ot 5 do 10 n=');

      read(n);

    until  n  in  [5..10];

    clrscr; hidecursor;

    xc: =windowwidth  div  2;

    yc: =windowheight  div  2;

    r1: =40;

    r2: =120;

    rc: =100; ro: =30;

    a: =2*pi/n;

    circle(xc,yc,r2);

    circle(xc,yc,r1);

      for  i: =1  to  n  do    begin    x: =xc+round(rc*cos(a*i));

      y: =yc-round(rc*sin(a*i));

      circle(x,y,ro);

        end.