Есть ответ 👍

Составить программы введите несколько чисел. найдите произведение чисел меньших 7. введите несколько чисел. найдите количество двузначных чисел. введите несколько чисел. определить каких чисел меньше - больше 10 или меньше 10 введите несколько чисел. вывести числа от 12 до 40 кратные 7.

236
334
Посмотреть ответы 2

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


Первая программа var   n, i, x, s : integer;   t : boolean; begin   writeln('количество чисел');   readln(n);   s : = 1;   t : = false;   for i : = 1 to n do     begin       writeln(i,' число');       readln(x);       if x < 7 then         begin           t : = true;           s : = s*x;         end;     end;   if t then     writeln('ответ ',s)   else     writeln('ответ ',0); end.втораяvar  n, i, x, s : integer; begin  writeln('kolichestvo chisel');   readln(n);   s : = 0;   for i : = 1 to n do    begin      writeln(i,' chislo');       readln(x);       if (x > = 10) and (x < 99) then        s : = s + 1;     end;   writeln('otvet: ',s); end.третьяvar  n, i, x, s : integer; begin  writeln('kolichestvo chisel');   readln(n);   s : = 0;   for i : = 1 to n do    begin      writeln(i,' chislo');       readln(x);       if x > 10 then        s : = s + 1      else if x < 10 then        s : = s - 1;     end;   if s > 0 then        writeln('chisel > 10 bolche')  else if s < 0 then    writeln('chisel < 10 bolche')  else    writeln('chisel porovnu'); end.четвёртаяvar  n, i, x : integer;   st : string; begin  writeln('kolichestvo chisel');   readln(n);   for i : = 1 to n do    begin      writeln(i,' chislo');       readln(x);       if (x > 12)   and (x < 40) and (x mod 7 = 0) then        st : = st + inttostr(x) + ' ';     end;     writeln('otvet: ',st); end.

Метод set нужен для того что бы присвоить закрытым (private)  переменным в классе какое-либо значение. т.к поле private  доступно только для методов этого класса.  а конструктор в зависимости от условия присваивает им какое-либо дефолтное значение . разница в том что конструктор запускается автоматически при создании объекта.  пример (с++) class fraction { private:   int n; int den; public: fraction();   // прототип конструктора void setfraction(int, int); // прототип сет-метода }; void fraction: : setfraction(int num, int denum) // сам сет-метод   { n = num; den = denum; } fraction: : fraction() // конструктор { int n = null; int den= null; }

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS