Determinati numerele de ordine ale urmatoarelor caractere:
- cifrele zecimale
facebookaugusti:
Prin ce tip de program ??? Pascal ?
da
numerele de ordine dupa alfabet ? sau dupa cum sunt scrie ?
til rezolv dupa ordinea cum sunt scrie de ex: c-1 i-2 f-3 r-4 etc..
Răspunsuri la întrebare
Răspuns de
25
Program Augustin;
s:string;
i:integer;
begin
s:='Cifre Zecimale';
i:=1;
for i:=1 to length(s) do
begin
if s[i]=' ' then i:=i+1;
Writeln(s[i],' ',i);
end;
readln;
end.
s:string;
i:integer;
begin
s:='Cifre Zecimale';
i:=1;
for i:=1 to length(s) do
begin
if s[i]=' ' then i:=i+1;
Writeln(s[i],' ',i);
end;
readln;
end.
Alte întrebări interesante
Matematică,
8 ani în urmă
Fizică,
8 ani în urmă
Limba română,
8 ani în urmă
Limba rusă,
9 ani în urmă
Limba română,
9 ani în urmă
Matematică,
9 ani în urmă
Limba română,
9 ani în urmă