Ответы на вопрос:
Программа вычисляет значение выражения, состоящего из целых чисел и знаков "+"/"-" между ними. (контроля правильности ввода нет! ) var s,t: string; i,a,b,c: integer; begin write('введите выражение: '); readln(s); a: =0; t: =''; for i: =1 to length(s) do begin if (s[i]< > '-')and(s[i]< > '+')and(s[i]< > '=') then t: =t+s[i] else begin val(t,b,c); a: =a+b; t: =s[i]; end; end; writeln(s,a); end. пример: введите выражение: 12+34-10= 12+34-10=36
Популярно: Информатика
-
roma28027430.09.2021 15:16
-
liza146017.07.2022 10:27
-
badurina92p0cc4904.12.2020 01:08
-
hfyvjfarioS23.07.2021 21:12
-
умник2005614.05.2022 08:13
-
azarovandrey12311.02.2020 07:49
-
Анжела20001114.12.2020 10:01
-
jnash99323.01.2020 04:08
-
TheCool11117.04.2021 10:01
-
WiTaMiN11125.02.2021 15:44