bhg50
?>

Вывести на экран результат вычисления 1+2-4

Информатика

Ответы

Викторовна
Можно с начало 1+2=3 3-4=-1
а можно 2-4=-2 1+(-2)=-1
НосовЖелиховская
Var
  s,subs:string;
  c:char;
  i,n,p:integer;
begin
  Writeln('Введите последовательность слов, разделенных пробелом');
  Readln(s);
  s:=' '+s+' ';
  Write('Введите искомый символ: '); Readln(c);
  subs:=' '+c;
  n:=Length(s);
  repeat
    p:=Pos(subs,s);
    if p>0 then begin
      i:=p+2;
      while (s[i]<>' ') and (i<=n) do i:=i+1;
      Write(Copy(s,p+1,i-p-1),' ')
    end;
    if i<=n then s:=Copy(s,i,n-i+1)
  until p=0 
end.

Тестовое решение:
Введите последовательность слов, разделенных пробелом
а роза упала на лапу азора
Введите искомый символ: а
а азора
Леонтьева
ну, насчет царя и бога - это другое лицо на любом предприятии, сейчас технологи ведут непрерывную войну со снабженцами, т. к. их цель - качество, снабжения - поиск более дешевого сырья. То, что технологи ценны -да, но только с опытом, платят по разному в зависимости от отрасли. Лично устроиться на пищевое предприятие дочке знакомой (вышка, технолог ). НО! в цех !! места технологов заняты и персонал меняется очень редко. Потом предложили ей вариант ночного технолога ( с 20 до 8, 2\2), она отказалась и в итоге ушла. Несколько раз устраивалась в открывающиеся точки общепита "от нуля" и работой от зари до зари, с уверениями "вы же понимаете - это только запуск, все оплатим, будет по другому", в итоге - люди запускают бизнес и с ними прощаются (закончился испытательный срок. Она так попала дважды. Трети предложенный вариант был похож на предыдущие два. Сейчас работает не по специальности.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Вывести на экран результат вычисления 1+2-4
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Анна1417
shumeikoElena362
zsa100
ЧумичеваГеннадьевна1827
Fetyukov
kurmaleeva
Кононова-БЕСКРОВНАЯ
stepanova-natalie
zakupki
balabinatanya7174
nzagrebin363
kuchino09
moscow053988
andreevaanastsiyao82
Pavlovna-Golovitinskaya378