Есть ответ 👍

Вравенстве ** + ***= цифры заменены звездочками. известно, что каждое их трёх чисел является палиндромом. программа должна их найти. (составить программу в pascal abc)

192
338
Посмотреть ответы 1

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


Var t: text; s: string: i,b: integer;   begin readln(s); {ввод строки} i: =0; b: =pos(' ',s); while  b< > 0 do   begin inc(i); delete(s,b,1); b: =pos(' ',s); end; assign (t, 'c: \primer.txt'); {соединение с файлом primer.txt} rewrite(t); {подготовка к записи в файл} write(t,i); {запись в файл значение переменной "i"} close(t); {завершение работы с файлом} end. создавать файл не обязательно, программа сама его создаст.  оцените мой ответ если это то, что вам нужно.

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS