Current File : //data/down/eBOOKS//ebooks/Matlab a Simulink/Matlab Pro Lamy/pismena.m
% vytvorte funkci , ktera prevede velka pismena v danem retezci na mala
% funkce ma parameter zadany retezec a vraci konvertovany retezec
clear;
clc;
vstup = input('Zadej retezec: ','s'); % zadanie vstupneho retazca
vstup=double(vstup); % prevod "char" na "double"
n = size(vstup,2); % nacitanie poctu znakov v retazci
for i=1:n
if vstup(i)>=97 % podmienka pre male pismena
vystup(i)=vstup(i);
else vystup(i)=vstup(i)+32; % podmienka pre velke pismena
if vstup(i)==32 % podmienka pre mezeru
vystup(i)=vstup(i);
end
end;
end
vystup=char(vystup); % prevod "double" na "char"
disp(['Po zmene velkych pismen na mala dostaneme: ' vystup ' :retazec'])
% malo by to vsetko fachcit tak jak ma.. meni to velke pismena na male
% a je tam osetrena aj medzera... ponecha mezderu
Mini Shell