Jimitapark8
16.12.2021 11:25

Встроке могут встречаться следующие символы: - прописные и строчные латинские буквы; - знаки препинания: точка, запятая, восклицательный и вопросительный знак; - пробелы; - символ -, обозначающий в некоторых случаях тире, а в некоторых - дефис.слово - это последовательность подряд идущих латинских букв и знаковдефис, ограниченная с обоих концов. в качестве ограничителей могут выступатьначало строки, конец строки, пробел, знак препинания, тире. тире отличается отдефиса тем, что слева и справа от знака дефис пишутся буквы, а хотя бы с однойстороны от тире идет либо начало строки, либо конец строки, либо пробел, либокакой-либо знак препинания, либо еще одно тире.напишите программу, определяющую, сколько слов в данной строке текста.входные данныевводится строка длиной не более 200 символов.выходные данныевыведите одно число — количество слов, которые содержатся в исходнойстроке.примерыввод выводhello, world! 2people 1 3chacha-kukaracha - not is a 4

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ievghienii1
27.11.2022 15:57

1) Как построить дом?

1) Нужно приобрести материалы для стройки

2) Купить территорию, где строить

3) Заложить фундамент

4) Начать строить пол, потом стены, не забывать всё укреплять

5) поставить окна

6) сделать утепление

7) поставить двери, замки, сеентехнику, провести электричество

8) построить крышу

9) наклееть обои, и покрасить стены

10) поставить мебель

11) ГОТОВО!

2) Как покрасить крышу дома?

1) купить краску

2) развести краску

3) залесть на крышу

4) начать красить с дальнего угла крыши от лестницы

5) когда докрасишь, дать просохнуть

6) повторяешь шаги 4 и 5 пару раз

7) ГОТОВО!

3) Как заложить фундамент?

я не знаю

0,0(0 оценок)
Ответ:
орало2
09.08.2021 17:30

const

 n = 15;

var

 x: array[1..n] of integer;

 i, k, t, min: integer;

begin

 Randomize;

 Writeln('Исходные элементы массива');

 min := 1000;

 for i := 1 to n do

 begin

   x[i] := Random(101) - 50;

   Write(x[i]:4);

   if min > x[i] then begin

     min := x[i];

     k := i

   end

 end;

 t := x[k]; x[k] := x[1]; x[1] := t;

 Writeln;

 Writeln('Результирующие элементы массива');

 for i := 1 to n do Write(x[i]:4);

 Writeln

end.

Исходные элементы массива

-28 -22 -15   3  27  29  34 -29 -49 -37 -19  31  40 -36   4

Результирующие элементы массива

-49 -22 -15   3  27  29  34 -29 -28 -37 -19  31  40 -36   4

Объяснение:

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота