2 похожие задаи, строки |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
2 похожие задаи, строки |
-Даша- |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 12 Пол: Женский Репутация: 0 |
1.Ввести с клавиатуры строку. Вывести на экран первую половину этой строки
2.Ввести с клавиатуры строку. Вывести на экран вторую половину этой строки Вот такой вопрос: а если в строке нечётное кол-во элементов, что делать? 1)uses crt; var a,b,c:string; r,q:integer; begin clrscr; writeln('Vvedite stroky');readln (a); writeln('Dlina stroki:',length(a)); q:=length(a); if length(a) mod 2=0 then r:=q/2 ; {нашли длину половины строки } {for i:=1 to r do begin} {затем вывод первой половины строки} writeln('Первая половина строки:',); else {а дальше как?} readkey;clrscr; end. Вопрос: как всё это прописать в паскале грамтно??? и правильно ли я поняла ход решения программы??? Сообщение отредактировано: -Даша- - |
Client |
Сообщение
#2
|
Профи Группа: Пользователи Сообщений: 865 Пол: Мужской Реальное имя: Вячеслав Репутация: 20 |
uses crt; Цитата Вот такой вопрос: а если в строке нечётное кол-во элементов, что делать? Это уж как ты захочешь |
-Даша- |
Сообщение
#3
|
Новичок Группа: Пользователи Сообщений: 12 Пол: Женский Репутация: 0 |
Client
Спасибо за помощь! Сообщение отредактировано: -Даша- - |
Текстовая версия | 19.04.2024 18:33 |