結果
問題 | No.708 (+ー)の式 |
ユーザー |
|
提出日時 | 2020-04-14 03:14:37 |
言語 | Kuin (KuinC++ v.2021.9.17) |
結果 |
AC
|
実行時間 | 2 ms / 2,000 ms |
コード長 | 805 bytes |
コンパイル時間 | 1,821 ms |
コンパイル使用メモリ | 146,312 KB |
実行使用メモリ | 5,376 KB |
最終ジャッジ日時 | 2024-09-16 10:31:53 |
合計ジャッジ時間 | 2,536 ms |
ジャッジサーバーID (参考情報) |
judge1 / judge3 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 3 |
other | AC * 12 |
ソースコード
func main()var ans: int :: 0var s: []char :: cui@input()var n: int :: ^svar st: int :: 0var minus: bool :: falsevar nest: bool :: falsefor i(0, ^s - 1)switch(s[i])case '('do nest :: truecase ')'do nest :: falseif(minus)do ans :- stelsedo ans :+ stend ifdo st :: 0do minus :: falsecase '+'if(!nest)do minus :: falseend ifcase '-'if(!nest)do minus :: trueend ifdefaultif(!nest)if(i = 0 | s[i - 1] <> '-')do ans :+ s[i] $ int - '0' $ intelsedo ans :- s[i] $ int - '0' $ intend ifelseif(i = 0 | s[i - 1] <> '-')do st :+ s[i] $ int - '0' $ intelsedo st :- s[i] $ int - '0' $ intend ifend ifend switchend fordo cui@print("\{ans}\n")end func