Есть ответ 👍

Логические выражения, 10 класс, информатика.​

205
230
Посмотреть ответы 1

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


program spos;

uses crt;

var

numb: array [1..100] of byte; // для последовательности чисел

i,f: integer; //счетчик и переменная в качестве флага

begin

randomize;

f: =0;

for i: =1 to 100 do numb[i]: =random(101); // задает последовательность

for i: =1 to 100 do

begin

write(',',numb[i]); // вывод на экран последовательность(можно удалить)

if (numb[i]=77)then f: =1; // в случае удачной проверки f: =1, в противном останется 0

end;

if f=0 then writeln('yes') else writeln('no');

end.

program spos;

uses crt;

var

numb: array [1..100] of byte; // для последовательности чисел

i,f: integer; //счетчик и переменная в качестве флага

begin

randomize;

f: =0;

for i: =1 to 100 do begin

numb[i]: =random(101); // задает последовательность

write(' ',numb[i]); //вывод на экран, можно удалить

end;

writeln;

i: =0;

repeat

i: =i+1;

if (numb[i]=77)then f: =1; // в случае удачной проверки f: =1, в противном останется 0

until i< 100;

if f=0 then writeln('yes') else writeln('no');

end.

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS