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

Зима! -> (/ничего не выводится/), мама мыла раму -> мыла раму

а можно как-то решить задачу без break? Мы это не проходили ещё:с

var a: string;i,k:integer;beginwriteln('Введите строку:');readln(a);for i:=1 to length(a) do beginif (a[i]=' ') and (k=0) then begink:=i;end;end;write('Строка: ');if k<>0 then begin delete(a,1,k);writeln(a);endelse writeln('');end.

ладно, спасибо))

Можешь помочь ещё с одним? http://znanija.com/task/15079159