Есть ответ 👍

1) напишите функцию вычисляющую количество трехзначных чисел делящихся на 13 и не оканчивающихся на 3 2)для некоторого массива из 30 элементов, проверить, есть-ли в массиве элемент, заданному значению с клавиатуры

180
458
Посмотреть ответы 2

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

Duka2003
4,5(50 оценок)

Pacal   function f() : integer;   var    k,i : integer;   begin    k : = 0;     for i : = 100 to 999 do    if (i mod 13 = 0) and (i mod 100 < > 3) then      k : = k +1;     result : = k;     end;       begin  writeln (;   end.  const      n = 30;     var    a : array [1..n] of integer;     i,b : integer;     r : boolean;           begin  readln (b);       i : = 1;   r : = false;     while (not r) and (i < = n) do    begin      if a[i] = b then      r : = true;       i : = i +1;     end;       if r then    writeln ('есть')  else    writeln ('нет');       end.

Var uniq: set of char;       used: set of char;       s: string;       i: integer;       done: boolean;       c: char; begin uniq : = []; used : = []; readln(s); for i : = 1 to length(s) do   if not (s[i] in used) then   begin       include(uniq, s[i]);       include(used, s[i]);   end   else   begin       exclude(uniq, s[i]);   end; done : = false; for c : = #0 to #255 do   if (c in uniq) then   begin       done : = true;       write(c);   end; if not done then   write('no'); writeln; end.

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS