gullieta
?>

Іздеу жинақтау сақтау жөнелту паиданалу өңдеу мылал келтіру​

Информатика

Ответы

Шитенков

Объяснение: я

shturman-765255

Твоя программа берет строку, а затем разбивает ее на слова(словом считается любая последовательность, признак конца такой последовательности - пробел), выводит программа слова в квадратных скобках, каждое слово на новой строке.

Теперь давайте детально.

Название подключенных директив пропали, но это не беда, посмотрев код можно понять, что это была директива iostream и директива string.

iostream нам нужна для ввода/вывода, а string для работы со строками.

using namespace std используем для подключения пространства имён.

int main() -  основная функция программы

string query - объявляем переменную типа string с именем query

getline(cin, query) считываем строку в переменную query

string word - cоздаем переменную типа string с именем word

for (int i = 0; i < query.size(); ++i) - запускаем цикл с параметром, который будет идти от 0 до размера строки(для увеличения i используется преинкремент)

В нашем цикле расположен условный оператор, в нём проверяется каждый символ, если это пробел, то мы выводим нашу переменную word на экран в квадратных скобочках + "обнуляем" переменную word, в ином случае мы добавляем к переменной word символ.

В конце программы мы выводим последнее значение word в квадратных скобках и ставим переход на новую строку (cout << '[' << word << ']' << endl;)

anatolevich1931

var  

x, y: integer;

n: integer;

sum: integer;

mindif: integer;

f: text;

begin

   assign(f,'C:\27-A.txt');

   reset(f);

   readln(f, n);

   sum := 0;

   mindif := 20001;

   while not eof(f) do begin

       readln(f, x, y);

       if x > y then  

           sum := sum + x

       else  

           sum := sum + y;

       if (abs(x - y) < mindif) and (abs(x-y) mod 3 <> 0) then mindif := abs(x-y);

   end;

   if sum mod 3 <> 0 then

       writeln(sum)

   else

       writeln(sum - mindif);

end.

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Іздеу жинақтау сақтау жөнелту паиданалу өңдеу мылал келтіру​
Ваше имя (никнейм)*
Email*
Комментарий*

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

evamining
Vladimirovich351
tatyana58
Олимов Протопопова
Ludmila777020
zdv686857
Filintver
Alnkseevna
megapolisgroup
Любовь-Волков1205
Shamsulo
kapitan19
Остап-Лаврова1410
diana0720
Fedorov1283