Задачка с ф-цией Countstrd, и задачка на Литеры Опции

[aleksvander]

Помогите с заданиями плисс

Задание:

Напишите функцию CountStrD(f), которая находит количество строк в файле, заканчивающихся буквой "d".

и

Написать функцию function Test(word:string): boolean принимающую значение True, если В строку входят литеры, содержащиеся в глобальной переменной W типа string.

Сообщение отредактировано: aleksvander - 29.05.2006 17:17

[klem4]

Bokul, можно короче:

var w:string;
function test(word:string):boolean;
var i:byte;
begin
  i := 1;
  while (i <= Length(w)) and (Pos(w[i], word) > 0) do inc(i);
  test := (i > Length(w));
end;

Строки бывают только в текстовых файлах smile.gif. Каждая строка заканчивается #10#13.
В типизированных - просто последовательность записей.

Тоесть строки хранащиеся в типизированном файле это не строки ? Читать-то из файла зиписи ты будешь в строку или как ?

[Code(R)]

Bokul, можно короче:

var w:string;
function test(word:string):boolean;
var i:byte;
begin
  i := 1;
  while (i <= Length(w)) and (Pos(w[i], word) > 0) do inc(i);
  test := (i > Length(w));
end;

Тоесть строки хранащиеся в типизированном файле это не строки ? Читать-то из файла зиписи ты будешь в строку или как ?

Типизированный файл - это последовательность записей, которые могут состоять из переменных любого типа, в том числе и из строк.

Да, с точки зрения формальной логики - это строки. Но тогда условие задачи становится каким-то корявым . По умолчанию предполагается, что это текстовый файл .