Условие задачи :
"В текстом файле необходимо вывести первую букву во второй строке"
Подскажите как перейти ко второй строке и вывести на печать первый символ, вот наработка моей задачи
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.
М | Тэги! |
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.
В данном решении выведится на печать первый символ в первой строке, а мне надо во второй строке, в этом вся и проблема. Это решение неверно
В файле несколько строк
извеняюсь , запустил задачу программа прошла,
спасибо
Добавлено через 13 мин.
Работаю учителем информатики в школе , составляю сборник задач по ОИВТ, надеюсь на вашу помощь, если какие задачи не будут проходить.