Se considera un sir de caractere.Sa se scrie programe care:
numara consoanele.
Va rog sa fie program pascal cu programe simple de cl 10!
Răspunsuri la întrebare
Răspuns de
1
program nrConsoane;
const consoane=['a'..'z', 'A'..'Z']-['a','e','i','o','u','A','E','I','O','U'];
var sir: string;
i, contor: integer;
begin
write(' introdu sirul de caractere: '); read(sir);
for i:=1 to length(sir) do
if sir[i] in consoane then inc(contor);
writeln( 'sirul dat contine ',contor,' consoane');
end.
Alte întrebări interesante
Matematică,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
8 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă
Fizică,
9 ani în urmă