Три друга: алеша, боря и витя учатся в одном классе. один из них ездит домой из школы на троллейбусе, другой – на трамвае, третий – на автобусе. однажды после уроков алеша пошел проводить своего друга до остановки автобуса. когда мимо них проходил автобус, третий друг крикнул из окна: «боря, ты забыл в школе тетрадку! ». кто на чем ездит домой?

Нам известно,что алёша не поехал на автобусе. а когда из троллейбуса крикнули боре,мы узнали,что алёша не ехал на троллейбусе,значит он ехал на трамвае. если из троллейбуса кричали боре,то значит это не он ехал на троллейбусе.  боря ездит на автобусе,так как на троллейбусе ездит витя,а на трамвае алёша.  алёша-на трамвае. боря-на автобусе. витя-на троллейбусе.

Const n = 10; var   a            : array[1..n,1..n] of integer;   b            : array[1..n] of integer;   i,j,max : integer; begin   randomize;   writeln('массив a: ');   for i: =1 to n do   begin       max: =1;       for j: =1 to n do       begin           a[j,i]: =random(90)+10;           if a[j,i]> a[max,i] then max: =j;       end;       b[i]: =a[max,i];   end;   for i: =1 to n do   begin       for j: =1 to n do write(a[i,j]: 3);       writeln;   end;   writeln(#13,'массив b: ');   for i: =1 to n do write(b[i]: 3);   writeln; end.

Function isprime(n: longint): boolean; var i, sqrtn, delta: word; begin   if (n > = 5) and ((n - 1) mod 6 = 0) or ((n + 1) mod 6 = 0) then begin       i : = 5;       delta : = 2;       sqrtn : = trunc(sqrt(n));       isprime : = false;       while i < = sqrtn do begin           if n mod i = 0 then exit;           inc(i, delta);           delta : = delta xor 6; {смена шага, то 2, то 4}       end;       isprime : = true;   end else       isprime : = (n = 2) or (n = 3); end; var a,b,i : integer; begin   readln(a,b);   for i: =a to b do if isprime(i) then writeln(i); end.