Паскаль. Дана символьная строка. Удалить из строки первое слово. Начало должно быть так:
var a:string; i,k:integer;
begin
writeln('введи строку:');
readln(a);
for i:= 1 to length(a) do
if a[i]