Задана последовательность символов, имеющая следующий вид: p1q1p2q2p3...qn–1pn
, где pi
— число, а qi
— знак арифметического действия из набора {+, –, *}. Вычислите значение выражения, предполагая, что действия выполняются согласно правилам арифметики.
Входные данные: На вход программе подается строка указанного вида, состоящая не более чем из 9 чисел, разделенных символами арифметических операций.
Выходные данные: Выведите значение арифметического выражения.
Пользователь вводит строку произвольных символов, посчитайте количество цифр в ней
var s:string; i,n:Integer;
begin
readln(s);
n := 0;
for i:=1 to Length(s) do begin // обходим строку в цикле
if (s[i]>='0')and(s[i]<='9') then inc(n);
end;
writeln('This string contains ',n,' digits.'); // выводим массив
readln();
end.