1. Информатика
  2. Напишите программу на

Напишите программу на pascalabc - дано слово. переставьте его последнюю букву на место первой. подразумевается при этом, что все последующие буквы будут сдвинуты вправо на одну позицию. вводится строка, состоящая из одного слова (последовательность строчных латинских букв без пробелов) длиной не более 150 символов.

nasstya05 nasstya05    2   08.10.2019 07:10    0

Ответы
Retro2122 Retro2122  10.10.2020 03:36

var

 str:string;

 s:char;

 i:integer;

Begin

 readln(str);

 s := str[length(str)];

 str := str + '0';

 for i := length(str)-1 downto 1 do begin

   str[i+1] := str[i];

 end;

 str[1] := s;

 delete(str, length(str), 1);

 writeln(str);

End.

жду лучший ответ

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
muhkirill2017 muhkirill2017  22.05.2020 20:53
Т-Т Написать логическую функцию...
aygi777 aygi777  21.05.2020 20:40
Нарисовать диаграмму изменения средней температуры. Диаграмма должна быть в виде гладких графиков. Параметры диаграммы: – тип диаграммы – точечная с гладкими кривыми, – цвет...
charlie911 charlie911  18.12.2020 10:13
9 класс написать программу нахождения минимального элемента массива сгенерированного для 637 элементов, для бега на дистанцию 100 метров. Pascal...
DanilFox02 DanilFox02  18.12.2020 10:13
Користувач вводить з клавіатури число N. Програма виводить на екран три числа: 1) суму усіх чисел на проміжку від 1 до N; 2) добуток усіх непарних чисел на проміжку від 1 до...
superpuper82 superpuper82  18.12.2020 10:14
Чи можна відео, зняте за до мобільного телефону у форматі 3GP, перетворити у формат AVI чи WMV? Що для цього потрібно?​...
HatryGG HatryGG  19.10.2020 06:50
Ім я користувача яке він задає під час реєстрації на поштовому сервері...
паст145 паст145  27.09.2019 01:00
Можете мне объяснить как работает дерево фенвика? написать его я могу, однако так и не разобрался почему и как оно работает....
димка185 димка185  27.09.2019 01:01
Записать по правилам программирования (видимо что basic) ! (tgb+e^-(x+3))√23sin a...
KARAZINO KARAZINO  27.09.2019 01:01
Сэкзаменом pascal: 1 : треугольник задан координатами своих вершин на плоскости. составить программу, которая определит, является ли он равносторонним, равнобедренным или разносторонним...
Dinara260803 Dinara260803  03.06.2019 03:20
Сочинение-повествование на тему олимпийские игры в моей судьбе...

Популярные вопросы