Дан текст. Написать программу, определяющую процентное отношение строчных и прописных букв к общему числу символов в нем.

uses crt;
var
   s:string;
   i:longint;
   lit:byte;
begin
   clrscr;
   readln(s);
   for i:=1 to length(s) do
      if s[i] in ['a'..'z','а'..'я','ё','A'..'Z','А'..'Я','Ё'] then
         inc(lit);
   writeln('Отношение букв к длине текста: ',lit/length(s)*100,'%');
end.

1а 594 б -5,19 в 0,5 г -43/13=-3 4/13 д 5,52 [tex] - \frac{19}{15} = - 1 \frac{4}{15} [/tex]3 4,5-2,61=1,894 14 и -14

20+25+25=69 (всего учеников)690÷69=10 ( каждый ученик)24*10= 24025*10=25020*10=200