Elaborati un program in pascal care va citi de la tastatura un sir de caractere(string). Si care va inlocui spatiile libere ci,,-'' si literele mari cu literele mici.
var i:integer;s:string;k:char;b:array [1..10] of integer;beginreadln(s);for i:=1 to length(s) doif s[i]=' ' thens[i]:='-';for k:='A' to 'Z' do lowercase(k); writeln(lowercase(s));end.
