с тестом,кто что знает) Какое будет значение переменной S после выполнения заданного фрагмента программы? S:='computer'; S:=Copy(S, Length(S) div 2, 3);

'com'

'compu'

'puter'

'put'

Чему будет равна величина b после выполнения фрагмента программы? a:='математика'; b:=pos('ка',а);

10

9

2

8

Заполните пропуски так, чтобы значение переменной S после выполнения заданного фрагмента имело значение 'ритм': P:='алгоритмизация'; S:=Copy(…., …., ….);

p,5,4

5,4,p

4,5,p

p,4,5

s,5,4

Чему будет равна величина b после выполнения фрагмента программы? a:='информатика'; b:=Length(a);

Мой ответ

Чему будет равна величина b после выполнения фрагмента программы? a:='информатика'; b:=copy(a,3,3)+copy(a,8,1);

инфор

форма

форт

формат

Чему будет равна величина b после выполнения фрагмента программы? a:='информатика'; b:=pos('форма',а);

Мой ответ

Задана строка а:='телевизор'. Чему будет равна величина b после выполнения фрагмента программы? b:=copy(a,1,1)+'ре'+copy(a,7,3);

ревизор

виззоре

визорре

трезор

Какое будет значение переменной S после выполнения заданного фрагмента программы? S:='program'; Insert(Copy(S, 2,2), S,4);

'prprogram'

'porprogram'

'program'

'prorogram'

​

#include <iostream>
#include <string>

using namespace std;

#define IN 1 //внутри слова
#define OUT 0 //вне слова

int main()
{
    string s;
    getline(cin, s);
    int state = OUT; //позиция
    s = ' ' + s + ' ';
    int k = 0; //позиция начала слова
    for (int i = 0; i < s.size(); i++)
        if (s[i] == ' ') {
            if (state == IN && s[k] == s[i - 1])
                cout << s.substr(k, i - k + 1) << endl;
            state = OUT;
        } else if (state == OUT) {
            k = i;
            state = IN;
        }
    return 0;
}

Сидели модераторы модерировали, причины для банов в текстовый файл записывали и жили хорошо.

Модератор с ником m0nclous любил красоту в текстовых файлах, поэтому он каждую причину хорошо форматировал, используя текстовый процессор "LibreOffice Writer". Некоторые спрашивали его, почему же не он не использует "Microsoft office Word"? На это он отвечал, то что он использует на своём компьютере операционную систему "Arch Linux", а на линукс нету microsoft office'а, но есть аналог - libreoffice.

Вот однажды причины для банов изменили и он сел за редактирование своего текстового файла с ними. Писал, писал и тут ему в голову пришла идея: "почему я должен сидеть и модерировать? Я на большее!".
После чего он он очистил файл, изменил его название на "hack-pentagon", изменил расширение на ".js" и начал редактировать код, используя текстовый редактор "sublime text 3". Просидел он 3 дня, 3 ночи, очень устал, но закончил свой проэкт. Он запустил свою программу и начался взлом Пентагона.

Но тут прилетает вертолёт, SWAT влетает в окна, скручивает его и садит в тюрьму.

Теперь m0nclous сидит за решеткой и придумывает разные рассказы, после чего записывает их в файл, используя текстовый процессор "Microsoft Word", потом распечатывает их и продаёт. Таким образом он гасит свой миллиардный штраф.