boro-1973
?>

Определите значение переменной а после выполнения фрагмента алгоритма: а: =10; b: =2; while a> b do b: =15-b; write(b)

Информатика

Ответы

Reznikova1075
Вывод данной программы будет число, равное 13
ridyana504

pascalabc.net

function isprime(n: integer): boolean;   // простое?

begin

  if n < = 1 then

  begin

    result : = false;

    exit

  end;

  result : = true;

  var (j, r) : = (2, round(sqrt(;

  while result and (j < = r) do

    if n mod j = 0 then

    begin

      result : = false;

      exit

    end

    else

      j += 1;

end;

function ishyperprime(n: integer): boolean; // гиперпростое?

begin

  result : = false;

  var k : = 10;

  while n > 10 do

  begin

    n : = n div 10;  

    if not isprime(n) then exit

  end;  

  result : = true

end;

begin

  var (a, b) : = readinteger2;

  var found : = false;

  foreach var n in range(a, b) do

    if isprime(n) then // найдено простоe число

      if ishyperprime(n) then

      begin

        found : = true;

        n.print

      end;

  if not found then

    write(0)

end.

laleonaretouch

Ниже

Объяснение:

Плагиат — умышленное присвоение авторства чужого произведения науки или искусства, технических решений или изобретений. Плагиат может быть нарушением авторско-правового законодательства и патентного законодательства и в качестве таковых может повлечь за собой юридическую ответственность. С другой стороны, плагиат возможен и в областях, на которые не рас действие каких-либо видов интеллектуальной собственности, например, в математике и других фундаментальных научных дисциплинах.

Авторское право — это право интеллектуальной собственности. Каждый, кто вложил время, средства и умственный труд в создание какого-либо произведения, хотел бы защитить своё творение. В понятии «авторское право» различают три определения: автор, субъект и объект права. Автор — это всегда физическое лицо, которое создало произведение.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Определите значение переменной а после выполнения фрагмента алгоритма: а: =10; b: =2; while a> b do b: =15-b; write(b)
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Евгеньевна_Хусинов
rusart3
КутузоваМартенюк
Головин662
nikomuneskazhu60
teya07
ERodina1
Vyacheslavovich-Gubanov
stusha78938
kuzinnv1968
izykova22
anastasiya613
bezzfamilny631
kseniyavaganova
Aleksandr768