Как перевернуть строку в паскале

Задача

Перевернуть строку, т.е. последние символы должны стать первыми, а первые последними.

Решение

s – строка;
n – середина строки;
c – меняемый символ.

Алгоритм решения задачи:

  1. Найти середину строки.
  2. Перебрать символы строки от начала до ее середины:
  1. очередной символ сохранить в переменной c;
  2. а на его место записать противоположный с конца;
  3. на место противоположного записать сохраненный в c.

ну вот сама задача:
Дан текстовый файл f. Записать в перевернутом виде строки файла f в файл g. Порядок строк в файле g должен
а) совпадать с порядком исходных строк в файле f;

я, например, поняла её так что к примеру в одном файле идёт строка :
юбьтимсчя в другом фале нужно получить ячсмитьбю . ну как то так.

Read(f,st);
For i:=n to 1 do
Write(g,st);

Сформировать из введенного числа обратное по порядку входящих в него цифр и вывести на экран. Например, если введено число 3486, то надо вывести число 6843.

Если постепенно извлекать из первого числа последние цифры (и удалять их после этого из числа) и постепенно "дописывать" их в конец второго, то в итоге мы получим перевернутое первое число.

  • Для извлечения последней цифры числа надо найти остаток от деления его на 10.
  • Чтобы добавить цифру в конец числа, надо умножить число на 10 (сдвинуть разряды) и затем прибавить цифру-число (количество единиц).
Читайте также:  Msi 770 c45 ms 7599 обновление биос
Оцените статью
Добавить комментарий

Adblock detector