Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
i,j,k: integer;
s,p: string;
begin
p: ='abcdefghijklmnopqrstuvwxyzабвгдеёжзийклмнопрстуфхцчшщъыьэюя';
readln(s);
k: =0;
for i: =1 to length(s) do
for j: =1 to length(p) do
if s[i]=p[j] then k: =k+1;
writeln(k);
end.
(3+3·3): 3=4
(3·3+3): 3=4
================
3+3–(3: 3)=5
(3+3): 3+3=5
3+3+(3–3)=6
3-3+3+3=6
3·3: 3+3=6
(3+3): 3·3=6
3: 3+3+3=7
3+3: 3+3=7
3·3–3: 3=8
3·3·3: 3=9
3: 3·3·3=9
3·3+3-3=9
3+3·3-3=9
3: 3+3·3=10
3·3+3: 3=10
2000 знаков (но точно не уверен)
формула имеет вид: =b$1*$a2
Популярные вопросы