Question

PASCAL ДАНА СТРОКА В КОТОРОЙ НАСКОЛЬКО СЛОВ. НАЙТИ ДЛИНУ ПЕРВОГО СЛОВА

Answer 1

var
str:string; 
p:integer;
begin
readln(str);

p:=pos(' ',str);

writeln(p-1);
end.

Answer 2

Soqwa, посмотри мою программу она на все случаи жизни

Answer 3

Не на все, далеко не на все