String70. Решебник Абрамяна М. Э.

String70. Дана строка, содержащая латинские буквы и скобки трех видов: «()», «[]», «{}». Если скобки расставлены правильно (то есть каждой открывающей соответствует закрывающая скобка того же вида), то вывести число 0. В противном случае вывести или номер позиции, в которой расположена первая ошибочная скобка, или, если закрывающих скобок не хватает, число -1.

Решение Pascal

 

Оцените решение
1 Звезда2 Звезды3 Звезды4 Звезды5 Звезд (2 оценок, среднее: 4,50 из 5)
Загрузка...

String70. Решебник Абрамяна М. Э.: 3 комментария

  • 21.09.2020
    Permalink

    package str;

    import java.util.Scanner;

    public class Str {
    public static void main(String[] args) {
    Scanner in = new Scanner(System.in);
    String str = in.next();
    if ((str.startsWith(«{«)&&str.endsWith(«}»))) {
    System.out.println(«0»);
    }
    else {
    System.out.println(«-1»);
    }
    }

    }

    Ответ
  • 04.10.2022
    Permalink

    program string70;

    type
    arrr=array[1..100] of string;

    var
    ar:arrr;
    s:string;
    pos2,pos1,i,num,num1,num2:integer;

    begin

    writeln(‘enter string’);
    readln(s);

    num:=0;num1:=0;num2:=0;

    for i:=1 to length(s) do begin

    if s[i]='(‘ then begin inc(num,1);pos1:=i; end;
    if s[i]=’)’ then begin dec(num,1);pos2:=i; end;

    if s[i]='{‘ then begin inc(num1,1);pos1:=i; end;
    if s[i]=’}’ then begin dec(num1,1);pos2:=i; end;

    if s[i]='[‘ then begin inc(num2,1);pos1:=i; end;
    if s[i]=’]’ then begin dec(num2,1);pos2:=i; end;

    if ((num=-1) or (num1=-1) or (num2=-1)) then begin writeln(‘pos=’,pos2);break; end;
    end;

    if ((num=0) and (num1=0) and (num2=0)) then writeln(‘0’);
    if ((num=1) or (num1=1) or (num2=1) ) then writeln(‘-1’);

    end.

    Ответ
  • 09.11.2022
    Permalink

    добавьте пожалуйста на С++

    Ответ

Добавить комментарий

Ваш адрес email не будет опубликован.

Решебник Абрамяна М. Э. на Pascal и С++. Символы и строки: группа String (1-70)

String1. Решебник Абрамяна М. Э.
String2. Решебник Абрамяна М. Э.
String3. Решебник Абрамяна М. Э.
String4. Решебник Абрамяна М. Э.
String5. Решебник Абрамяна М. Э.
String6. Решебник Абрамяна М. Э.
String7. Решебник Абрамяна М. Э.
String8. Решебник Абрамяна М. Э.
String9. Решебник Абрамяна М. Э.
String10. Решебник Абрамяна М. Э.
String11. Решебник Абрамяна М. Э.
String12. Решебник Абрамяна М. Э.
String13. Решебник Абрамяна М. Э.
String14. Решебник Абрамяна М. Э.
String15. Решебник Абрамяна М. Э.
String16. Решебник Абрамяна М. Э.
String17. Решебник Абрамяна М. Э.
String18. Решебник Абрамяна М. Э.
String19. Решебник Абрамяна М. Э.
String20. Решебник Абрамяна М. Э.
String21. Решебник Абрамяна М. Э.
String22. Решебник Абрамяна М. Э.
String23. Решебник Абрамяна М. Э.
String24. Решебник Абрамяна М. Э.
String25. Решебник Абрамяна М. Э.
String26. Решебник Абрамяна М. Э.
String27. Решебник Абрамяна М. Э.
String28. Решебник Абрамяна М. Э.
String29. Решебник Абрамяна М. Э.
String30. Решебник Абрамяна М. Э.
String31. Решебник Абрамяна М. Э.
String32. Решебник Абрамяна М. Э.
String33. Решебник Абрамяна М. Э.
String34. Решебник Абрамяна М. Э.
String35. Решебник Абрамяна М. Э.
String36. Решебник Абрамяна М. Э.
String37. Решебник Абрамяна М. Э.
String38. Решебник Абрамяна М. Э.
String39. Решебник Абрамяна М. Э.
String40. Решебник Абрамяна М. Э.
String41. Решебник Абрамяна М. Э.
String42. Решебник Абрамяна М. Э.
String43. Решебник Абрамяна М. Э.
String44. Решебник Абрамяна М. Э.
String45. Решебник Абрамяна М. Э.
String46. Решебник Абрамяна М. Э.
String47. Решебник Абрамяна М. Э.
String48. Решебник Абрамяна М. Э.
String49. Решебник Абрамяна М. Э.
String50. Решебник Абрамяна М. Э.
String51. Решебник Абрамяна М. Э.
String52. Решебник Абрамяна М. Э.
String53. Решебник Абрамяна М. Э.
String54. Решебник Абрамяна М. Э.
String55. Решебник Абрамяна М. Э.
String56. Решебник Абрамяна М. Э.
String57. Решебник Абрамяна М. Э.
String58. Решебник Абрамяна М. Э.
String59. Решебник Абрамяна М. Э.
String60. Решебник Абрамяна М. Э.
String61. Решебник Абрамяна М. Э.
String62. Решебник Абрамяна М. Э.
String63. Решебник Абрамяна М. Э.
String64. Решебник Абрамяна М. Э.
String65. Решебник Абрамяна М. Э.
String66. Решебник Абрамяна М. Э.
String67. Решебник Абрамяна М. Э.
String68. Решебник Абрамяна М. Э.
String69. Решебник Абрамяна М. Э.
String70. Решебник Абрамяна М. Э.