Есть ответ 👍

Напишите программу которая генерирует 15 случайных чисел в диапозоне -50 и 50 и выводит на экран числа оканчивающиеся на 1

163
320
Посмотреть ответы 2

Ответы на вопрос:


Program gfh; uses crt; var a, b: integer; begin clrscr; a: =random(50+50+1)-50; if (a< -9) and (a> 9) then b: =a mod 10; if (b=1) then writeln(b); if (a=1) then writeln(a); end.

Dim x as integer, y as integer dim f as integer, p as integer cls for x = 0 to 40     y = x * x + x + 41     if y mod 2 = 0 then f = -1 else f = 0     p = 3     do while f = 0 and p * p < = y           if y mod p = 0 then f = -1 else f = 0           p = p + 2     loop     if f = 0 then           print "x="; x, "y="; y, "is prime"     else           print "x="; x, "y="; y, "not prime"     end if next x end обнаружился странный эффект qbasic. последовательность команд: y: =x^2+x+41 для x=40 присваивает у значение 1681. для p=41 значение p^2 также равно 1681, но значение выражения p^2< =y при этом оказывается ложным, хотя p^2 в этом случае должно быть равно у. в связи с этой странностью вместо х^2 использовано х*х, а вместо p^2 использовано р*р. результат выполнения программы: x= 0                  y= 41                is prime x= 1                  y= 43                is prime x= 2                  y= 47                is prime x= 3                  y= 53                is prime x= 4                  y= 61                is prime x= 5                  y= 71                is prime x= 6                  y= 83                is prime x= 7                  y= 97                is prime x= 8                  y= 113              is prime x= 9                  y= 131              is prime x= 10                y= 151              is prime x= 11                y= 173              is prime x= 12                y= 197              is prime x= 13                y= 223              is prime x= 14                y= 251              is prime x= 15                y= 281              is prime x= 16                y= 313              is prime x= 17                y= 347              is prime x= 18                y= 383              is prime x= 19                y= 421              is prime x= 20                y= 461              is prime x= 21                y= 503              is prime x= 22                y= 547              is prime x= 23                y= 593              is prime x= 24                y= 641              is prime x= 25                y= 691              is prime x= 26                y= 743              is prime x= 27                y= 797              is prime x= 28                y= 853              is prime x= 29                y= 911              is prime x= 30                y= 971              is prime x= 31                y= 1033            is prime x= 32                y= 1097            is prime x= 33                y= 1163            is prime x= 34                y= 1231            is prime x= 35                y= 1301            is prime x= 36                y= 1373            is prime x= 37                y= 1447            is prime x= 38                y= 1523            is prime x= 39                y= 1601            is prime x= 40                y= 1681            not prime

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS