Question

Составить программу для подсчёта суммарного количества байт введённого предложения или слова (с предусловием и постусловием).

Answer 1

var
s:string[255];
begin
readln(s);
writeln(length(s));
end.