Pasca program eazy; var s:string; i:integer; begin writeln('Vvedite tekst'); readln(s); for i:=length(s) downto 1 do if (s[i]=' ') or(s[i]=',') or (s[i]='.') then delete(s,i,1) ; writeln(s); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.