Развернуть заданную строку (блок-схема) - Pascal

Pascal (Паскаль)

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.82/11:

@iskantino 0 / 0 / 0 Регистрация: 30.11.2013 Сообщений: 19

	Развернуть заданную строку (блок-схема) 07.05.2014, 11:19. Показов 2029. Ответов 2 Метки нет (Все метки) Помогии!!!срочно 0

Лучшие ответы (1)

Сообщение: #6139428

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

07.05.2014, 11:19

Ответы с готовыми решениями:

Блок-схема к программе вставки символов в строку
составить блок схему program lab_8; var s:string; i,d:integer; begin writeln('информ часть'); writeln('введите текст'); ...

Найти строку матрицы с наибольшей суммой элементов (Блок-схема)
заранее благодорю 1. var z,x,y:real; n:integer; begin n:=3;x:=2.8;y:=sin(n*x)+0.5; if y<>0 then begin...

Развернуть заданную часть строки
Задача такая, есть переменная:$str в которой находится произвольная строка. так же есть 2 переменные( допустим a и b) в которых указан...

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	07.05.2014, 11:21
	Развернул, и что? 0

APALoff

1648 / 1077 / 1081

Регистрация: 03.07.2013

Сообщений: 4,507

08.05.2014, 08:57

Сообщение было отмечено iskantino как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
Function StRevers(St :String) : String;
Var
  ii  : Longint;
  St0 : String;
Begin
  St0:='';
 For ii:=length(St) downto 1 do
  St0:=St0+St[ii];
  StRevers:=St0;
end;

Добавлено через 20 часов 7 минут
или так:

Pascal
1
2
3
4
5
Function StRevers(St : String) : String;
Begin
  If Length(St)>0 then StRevers:=StRevers(Copy(St,2,Length(St)-1))+St[1]
   else StRevers:='';
end;

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

08.05.2014, 08:57

Помогаю со студенческими работами здесь

Найдите заданную строку и заданную колонку двумерного массива А(4, 6). Напечатайте их
Найдите заданную строку и заданную колонку двумерного массива А(4, 6). Напечатайте их. Строки,колонки вводим с клавиатуры!

Вставить после каждой строки содержащей минимальный элемент массива, строку из нулей (Блок-схема)
Задана целочисленная квадратная матрица b. 1. Вставить после каждой строки содержащей минимальный элемент массива, строку из нулей. ...

Создать новую строку из символов 1-ой заданной строки, которые не входят во вторую заданную строку
Pascal:Создать новую строку из символов 1-ой заданной строки, которые не входят во вторую заданную строку.

Сформировать строку, состоящую из всех строчных букв, входящих в заданную строку, без повторов
14 . Сформировать строку, состоящую из всех строчных букв, входящих в заданную строку, без повторов. одна тема - одна задача, читайте...

В матрице поменять местами заданную строку и строку содержащую минимальный элемент среди неотрицательных элементов
Задание: В заданной матрице поменять местами: 1) строку с указанным номером и строку, содержащую минимальный элемент среди элементов с...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .

Наверх