задача на файлы, помогите решить задачу Опции

[Игорь2]

Условие задачи :
"В текстом файле необходимо вывести первую букву во второй строке"
Подскажите как перейти ко второй строке и вывести на печать первый символ, вот наработка моей задачи

program f375;
var f : text;
    s : string;
begin
assign(f, 'C:\1.txt'); 	
reset(f); 			
readln(f,s);
writeln (copy(s,1,2)) ;
 close(f);
end.

М

Тэги!

[Ozzя]

program f375;
var 
  f : text;
  s : string;
begin
  assign(f, 'C:\1.txt'); 
  reset(f); 
  readln(f,s);
  readln(f,s);
  writeln (s[1]) ;
  close(f);
end.

[Игорь2]

В данном решении выведится на печать первый символ в первой строке, а мне надо во второй строке, в этом вся и проблема. Это решение неверно
В файле несколько строк

[volvo]

одскажите как перейти ко второй строке и вывести на печать первый символ

Пропустить первую строку, что Оззя и сделал... С чего это там

выведится на печать первый символ в первой строке

, если ReadLn присутствует ДВА раза?

Добавлено через 46 сек.

Это решение неверно

А ты соизволил его запустить, или так, навскидку?

[Игорь2]

извеняюсь , запустил задачу программа прошла,
спасибо

Добавлено через 13 мин.
Работаю учителем информатики в школе , составляю сборник задач по ОИВТ, надеюсь на вашу помощь, если какие задачи не будут проходить.

[Ozzя]

Работаю учителем информатики в школе ,

Приветствую, колллега ;)

составляю сборник задач по ОИВТ,

Э-э-э, не вижу смысла, ибо есть задачники Пильщикова, Абрамова, и проч.
Уверяю Вас, их вполне достаточно

надеюсь на вашу помощь, если какие задачи не будут проходить.

С удовольствием