• Дано слово s1.Получить слово s2, образованное нечетными буквами слова s1.

     

Ответы 1

  • var a:integer;var s1,s2:string;begin  inc(a);  write('Vvedite slovo: ');  readln(s1);  repeat   s2:=s2+s1[a];   a:=a+2;  until(a>length(s1));  writeln(s2);  readln;end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years