Строчка t одинакова реальность. Отыскать значение: copy(t, 14, 2)+copy(t, 6, 1)+copy(t,

Строка t равна действительность. Отыскать значение: copy(t, 14, 2)+copy(t, 6, 1)+copy(t, 13, 1)+copy(t, 10, 1); copy(t, 6, 2)+ copy(t, 1, 1). 2. Строчка t одинакова Реальность. Написать метод (программку) составления слов: Деяние СВИДЕТЕЛЬ ДЕЛО

Задать свой вопрос
1 ответ

1. стволвид

2.

var

 t: string;

begin

   t := 'Реальность';

   WriteLn (Copy (t, 1, 7) + Copy (t, 2, 1));

   WriteLn (Copy (t, 4, 1) + Copy (t, 6, 2) + Copy (t, 1, 2) + Copy (t, 8, 4));

   WriteLn (Copy (t, 1, 2) + Copy (t, 10, 1) + Copy (t, 13, 1));

end;

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт