ввести строку символов определить и вывести на экран ее длину. вывести на экран первый и последний символ этой строки
Ответы
Ответ дал:
4
PascalABC
var
s : string;
l : integer;
begin
readln (s);
l := Length(s);
writeln (l);
writeln (s[1]);
writeln (s[l]);
end.
var
s : string;
l : integer;
begin
readln (s);
l := Length(s);
writeln (l);
writeln (s[1]);
writeln (s[l]);
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
7 лет назад