Есть ответ 👍

Исполнитель Черепашка перемещается на экране компьютера, оставляя след в виде линии. В каждый конкретный момент известно положение исполнителя и направление его движения. У исполнителя существует две команды: Вперёд n (где n — целое число), вызывающая передвижение Черепашки на n шагов в направлении движения; Направо m (где m — целое число), вызывающая изменение направления движения на m градусов по часовой стрелке. Запись Повтори k [Команда1 Команда2 КомандаЗ] означает, что последовательность команд в скобках повторится k раз.
Черепашке был дан для исполнения следующий алгоритм: Повтори 5 [Вперёд 100 Направо 120] Какая фигура появится на экране?

119
440
Посмотреть ответы 1

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


Я  здесь  и  для  *(умножения  тоже  сделал) program gt; label 1; var a: string; i,l,s,s2,s3,j: longint; begin read(a); l: =length(a); s: =0; s2: =0; for i: =1 to l do begin if (a[i]='+')or(a[i]='-')or(a[i]='*')then goto 1; end; 1: for j: =1 to i-1 do begin if a[j]='1' then s: =s*10+1; if a[j]='2' then s: =s*10+2; if a[j]='3' then s: =s*10+3; if a[j]='4' then s: =s*10+4; if a[j]='5' then s: =s*10+5; if a[j]='6' then s: =s*10+6; if a[j]='7' then s: =s*10+7; if a[j]='8' then s: =s*10+8; if a[j]='9' then s: =s*10+9; if a[j]='0' then s: =s*10+0; end; for j: =i+1 to l do begin if a[j]='1' then s2: =s2*10+1; if a[j]='2' then s2: =s2*10+2; if a[j]='3' then s2: =s2*10+3; if a[j]='4' then s2: =s2*10+4; if a[j]='5' then s2: =s2*10+5; if a[j]='6' then s2: =s2*10+6; if a[j]='7' then s2: =s2*10+7; if a[j]='8' then s2: =s2*10+8; if a[j]='9' then s2: =s2*10+9; if a[j]='0' then s2: =s2*10+0; end; if a[i]='+' then s3: =s+s2; if a[i]='-' then s3: =s-s2; if a[i]='*' then s3: =s*s2; writeln(s3); end. 2)более  проще program gt; label 1; var a: string; i,l,s,s2,s3,j: longint; begin read(a); l: =length(a); s: =0; s2: =0; for i: =1 to l do begin if (a[i]='+')or(a[i]='-')or(a[i]='*')then goto 1; end; 1: for j: =1 to i-1 do begin s: =s*10+ord(a[j])-48; end; for j: =i+1 to l do begin s2: =s2*10+ord(a[j])-48; end; if a[i]='+' then s3: =s+s2; if a[i]='-' then s3: =s-s2; if a[i]='*' then s3: =s*s2; writeln(s3); end.

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

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

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

Caktus Image

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

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

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

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

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

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

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

GTP TOP NEWS