 паскаль фри,строки, заданы м строк символов которые вводятся с клавиатуры напечатать все ц |
Внимание!
1. Пользуйтесь тегами кода. - [code] ... [/code]
2. Точно указывайте язык, название и версию компилятора (интерпретатора).
3. Название темы должно быть информативным.
В описании темы указываем язык!!!
| masha |
 5.12.2011 19:19
Сообщение
#1
|
|
Группа: Пользователи Сообщений: 1 Пол: Женский Репутация:  0   |
Код Program My; var s:string; i,n,m:integer; begin write('vvedite stroky: '); readln(s); n:=length(s); for i:=1 to n do if(n mod 2)=1 then write(s[i][(n div 2)+1]); Помогите пожалуйста |
   |
 
|
  |
Ответов
| TarasBer |
6.12.2011 9:28
Сообщение
#2
|
 Злостный любитель  Группа: Пользователи Сообщений: 1 755 Пол: Мужской Репутация: 62 |
Форматирование жжот
КГ/АМ -------------------- |
|
|
|
Сообщений в этой теме
masha паскаль фри,строки 5.12.2011 19:19
sheka Ни задания, ни текста не видно. Отредактируй. 6.12.2011 0:56
Krjuger Ну если востановить то,что в заголовке и то, что н... 7.12.2011 0:31 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 30.07.2025 4:03 |