Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Scrilkor
0 / 0 / 0
Регистрация: 21.06.2015
Сообщений: 11
1

Создать переводчик для Зазеркалье: слово, введенное пользователем, переводится на Зеркальный язык

01.10.2015, 00:36. Просмотров 886. Ответов 2
Метки нет (Все метки)

создать переводчик для Зазеркалье: слово, введенное пользователем, переводится на Зеркальный язык. Выполнить задание двумя способами: 1) рассматривая строку как массив символов 2) применяя функции и процедуры обработки строк
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.10.2015, 00:36
Ответы с готовыми решениями:

Введенное пользователем слово вывести по главной диагонали
Помогите пожалуйста с задачкой!! Буду очень благодарна)))Введенное...

Считать введенное пользователем слово
Помогите: Запрашивать у пользователя строки до тех пор, пока он не введет...

В строке заменить пробелами слово, введенное пользователем
Пожалуйста помогите!!! Дан текст. Заменить пробелами слово, введѐнное...

Вывести те из предложений, в которых встречается слово, введенное пользователем
Работа со строками и файлом Написать программу, которая считывает из...

Определить, сколько раз встречается в файле введенное пользователем слово
Дан текстовый файл. Напишите программу, которая определяет, сколько раз...

2
vovachuk
13 / 13 / 18
Регистрация: 08.01.2015
Сообщений: 53
01.10.2015, 01:14 2
1)
Pascal
1
2
3
4
5
6
7
8
var a,b:string; i:integer;
begin
writeln('введите строку');
readln(a);
for i:=length(a) downto 1 do
b:=b+a[i];
writeln('ответ - ',b);
end.
2)
Pascal
1
2
3
4
5
6
7
8
var a,b:string; i:integer;
begin
writeln('введите строку');
readln(a);
for i:=length(a) downto 1 do 
b:=b+copy(a,i,1);
writeln('ответ - ',b);
end.
Надеюсь, я правильно понял...
1
Puporev
Модератор
54677 / 42099 / 29068
Регистрация: 18.05.2008
Сообщений: 99,348
01.10.2015, 08:17 3
Лучший ответ Сообщение было отмечено Scrilkor как решение

Решение

1)
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var a:string;
    c:char;
    n,i:byte;
begin
writeln('введите строку');
readln(a);
n:=length(a);
for i:=1 to n div 2 do
 begin
  c:=a[i];
  a[i]:=a[n-i+1];
  a[n-i+1]:=c;
 end;
writeln('ответ - ',a);
end.
2)
Pascal
1
2
3
4
5
6
7
8
9
10
11
var a:string;
    n,i:byte;
begin
writeln('введите строку');
readln(a);
n:=length(a);
for i:=n downto 1  do
a:=a+a[i];
delete(a,1,n);
writeln('ответ - ',a);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.10.2015, 08:17

Определить, сколько раз в строке встречается введенное пользователем программы слово
Написать код который определить, сколько раз в строке встречается введенное...

Как вывести строку из таблицы БД, если в этой строке есть введенное пользователем слово?
Всем привет. Такой вопрос: как вывести строку из таблицы БД, если в этой строке...

Из введенной пользователем строки выбрать слово с заданным пользователем номером и вывести это слово на экран
Здравствуйте. Если можете, помогите, пожалуйста, написать программу, которая...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru