Программа вычисляет введенное пользователем значение выражения типа A1 Z1 A2 Z2 A3 Z3 … Am Zm, где Ai — целое число от 0 до 9, а Zj — знак + или -.
Решение:
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | program characters_and_strings_9; uses crt; var example: string; i, n, znak, otv: integer; begin clrscr; randomize; Write(‘Введите пример > ‘); read(example); i:=3; n:=length(example); otv:=ord(example[1]); while i<=n do begin znak:=ord(example[i–1]); if znak=43 then otv:=otv+(ord(example[i])–48) else if znak=45 then otv:=otv–(ord(example[i])–48) else exit; i:=i+2; end; otv:=otv–48; write(example,‘=’,otv); readkey; end. |
Я уже 3 года торгую фьючерсами на Bybit и приглашаю тебя присоединиться и получить до $30 000 бонусами плюс скидки на комиссии:
Зарегистрироваться на Bybit
Чем больше депозит – тем больше бонусов. Также моим рефералам доступны торговые боты для трейдинга по самым выгодным тарифам.