Регистрация Спросить otvet5GPT
3339991
31.05.2023 02:51
Информатика
Есть ответ 👍

1)дана строка символов среди которых есть двоеточие (: )определите сколько символов ему предшествует. 2)дана строка слов в. сформулируйте величину а, состоящию из первых букв слов входящих в строку в. 3)дана строка состояща я из нескольких слов .найдите наибольшую длину слова. 4()в записке слова зашифрованы каждое из них записано на оборот ,расшифруйте сообщение .

251
390
Посмотреть ответы 2

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

siolvermen2005
siolvermen2005
4,6(83 оценок)
Pascalabc.net 3.2: 1. begin     write(readstring.indexof(': ')) end. пример ввода: 1234: 56 пример вывода: 4 2. begin     write(readstring.towords.select(x-> x[1]).joinintostring) end. пример ввода: как любила язвить королева, собаки апплодировали пример вывода: клякса 3. begin     write(readstring.towords.select(s-> length() end. пример ввода: не хочу учиться хочу жениться пример вывода: 8 4. если там нет знаков препинания: begin     write(readstring.towords.select(s-> reversestring((' ')) end. если там есть знаки препинания, которые надо оставить на месте, то настолько же короткого решения мне не придумалось, можно так:   begin   var str : = readstring + ' ';   var m : = '';   for var i : = 1 to str.length do     if str[i].isletter then       m += str[i]     else     begin       write(reversestring(m), str[i]);       m : = '';     end; end. пример ввода:   амар алым умам пример вывода:   рама мыла маму
tim20053
tim20053
4,5(88 оценок)

program njn;

uses crt;

var a: array [1..100] of integer;

        i,p: integer;

        s: real;

begin

clrscr;

readln(a[1],q,n);

s: =0;

p: =a[1];

for i: =2 to n do begin

  a[i]: =p*q;

p: =a[i];

end;

for i: =1 to n do

writeln(a[i]);

for i: =1 to n do

s: =s+a[i];

writeln('среднее=',s/n);

readln;

end.

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

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

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

Caktus Image

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

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

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

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

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

  • В чем отличия от ChatGPT?

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

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

GTP TOP NEWS