Есть ответ 👍

Дан текст, содержащий от 2 до 30 слов, в каждом из которых от 2 до 10 латинских букв; между соседними словами - не менее одного пробела. напечатать все слова, отличные от последнего слова, предварительно преобразовав каждое из них по следующему правилу: 1) перенести первую букву в конец слова; 2) перенести последнюю букву в начало слова. pascal// с некоторым описанием 10-11 кл

226
488
Посмотреть ответы 2

Ответы на вопрос:

Lokkinine
4,7(87 оценок)

Var   ast: array[1..30] of string; procedure getword(s: string; var ib: integer; var pword: string; var l: integer); // возвращает слово pword, которое является подстрокой s // разделителем слов являются один и более пробелов. // ib при вызове процедуры указывает на позицию в строке s, // начиная с которой ведется поиск слова. // при выходе из процедуры ib - позиция начала найденного слова, // l- длина найденного слова, l=0 если слово не найдено.  var

Объяснение:айым

Популярно: Информатика