Прикладываите свои фаилы
Не у всех есть тетрадь по информатике за 4 класс
Var
s, si, sm: string;
i, n: integer;
f: Text;
begin
Assign(f, 'input.txt');
Reset(f);
Readln(f, s);
Close(f);
Assign(f, 'output.txt');
Rewrite(f);
n := Length(s);
sm := Copy(s, 2, n - 1);
for i := 2 to n do
begin
si := s;
Delete(si, i, 1);
if sm < si then sm := si
end;
Writeln(f, sm);
Close(f)
end.
<span>Нумерованные списки представляют собой набор элементов с их порядковыми номерами. </span>
1.
Наука
Физика
Квантовая механика
Электрон
2. Термин "квантовая механика" является гиперонимом по отношению к термину "Электрон".