Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Работа с файлами 2

Автор: @^WARlock^@ 13.08.2006 11:03

Помогите решить.

Нужно написать программу, которая считывает текстовый файл и определяет содержится ли в нем строчные буквы латинского алфавита.

Строчные т.е. маленькие?

Автор: Bokul 13.08.2006 12:10

А в чем проблема? Не умеешь работать с файлами, тогда загляни в Faq (http://forum.pascal.net.ru/index.php?showtopic=3584).
Если проблема в том как опредилить регистр буквы, то вот функция, которая возвращает true, если это строчная (то есть маленькая) буква и false - в противном случае:

function letter_case(ch:char):boolean;
begin
if (ord(ch)>=97) and (ord(ch)<=122) then
letter_case:=true
else
letter_case:=false;
end;

Автор: klem4 13.08.2006 13:47

Можно чуть покороче smile.gif

function LetterCase(ch : char) : boolean;
begin
LetterCase := (ch in ['a'..'z']);
end;