Строки - Форум
Пятница, 09.12.2016, 10:44
Задачи по информатике
Главная | Регистрация | Вход Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Модератор форума: ignorer, KOT_B_MEIIIKE, PASCAL26, atvrider 
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » Строки (Pascal)
Строки
busterДата: Воскресенье, 22.05.2011, 15:59 | Сообщение # 1
Лейтенант
Группа: Новичок
Сообщений: 14
[ 0 ]
Статус: Offline
1Введите строку (с пробелами). Выведите на экран в столбик слова строки состоящие из нечетного количества букв.
2 Введите строку (с пробелами).Выведите на экран слова строки, которые являются палиндромами.
Помогите пожалуйста оч надо.
Или кто может исправьте ошибку в 1-й вот:
program z1;
var
s,b:string;
i:integer;
begin
writeln('vved stroky');
readln(s);
for i:=1 to length(s) do
if s[i]<>' ' then b[i]:=b+s[i]
else if length(b) mod 2<>0 then writeln(b)
else delete(b,1,length(b));
end.
 
NailДата: Воскресенье, 22.05.2011, 16:22 | Сообщение # 2
Генералиссимус
Группа: Заблокированные
Сообщений: 127
[ 0 ]
Статус: Offline
Сделаю, пиши
Mail: shakurovnail@mail.ru
Icq: 6688101
Skype: shakurovnail
 
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » Строки (Pascal)
Страница 1 из 11
Поиск:

Copyright MyCorp © 2016