Var s:string;
i,a:longint;
begin
readln(s);
for i:=1 to length(s) do
if (s[i]='-') or (s[i]='*') or (s[i]='/') or (s[i]=',') then
inc(a);
writeln(a);
<span>end.</span>
Шта??????????????????????
#include <iostream>
using namespace std;
int main(){
int p;
cin >> p;
switch(p){
case 60 ... 69:
cout << 2;
break;
case 70 ... 79:
cout << 3;
break;
case 80 ... 89:
cout << 4;
break;
case 90 ... 100:
cout << 5;
break;
default:
cout << "Fail";
break;
}
cout << endl;
return 0;
}
По замечанию уважаемой nelle987 и представленной ею формулой
, корректирую свой ответ.
Все числа типа
между 123 и 172:
<span>
</span><span>
</span>