Мне сдавать уже что в векторных редакторах позволяет изменять видимость объектов, образующих рисунок?

Слои (layouts)  позволяют изменять видимость одного объекта относительно другого.

запишу на обычном языке, паскаль не помню уже.

а - первое число. б - второе число.

если а больше б и б div 5=0 тогда выводится на экран (' б наименьшее число и нацело делится на 5')

если б больше а и а div 5=0 тогда выводится на экран (' а наименьшее число и нацело делится на 5')

 

точно не помню как выглядит это в паскале, но что-то типо такого

if a< b and a div 5=0 then writeln ('а наименьшее число и нацело делится на 5');

if b< a and b div 5=0 then writeln ('б наименьшее число и нацело делится на 5');

  program abitura;

uses crt;

var n,i,r,n1,n2,n3: integer;

begin

      clrscr;

      write('введите количество абитуриентов: ');  

 

      readln(n);

      for i: =1 to n do

            begin

                  writeln('абитуриент номер ' ,i  );  

                  write('введите оценку за первый экзамен');  

 

                  readln(n1);

                  write('введите оценку за второй экзамен');  

                  readln(n2);

                  write('введите оценку за третий экзамен');  

                    readln(n3);

                  r: =n1+n2+n3;

                  if (r> =13) then writeln('вы зачислены на дневное отделение ');  

 

                  if (r> 10) and (r< 12)  then writeln('вы зачислены на вечернее отделение ');  

 

                  if (r> =8) and (r< =9)  then writeln('вы зачислены на заочное отделение ');

                  if   (r< 8)  then writeln('вам отказанно в зачислении ! ');              

            end;    

      readkey;  

 

  end.