Напечатать слова, стоящие на четных позициях

@Trofik9 · Регистрация: 12.06.2010

Студворк — интернет-сервис помощи студентам

№1 Написать программу которая выводит на печать все слова, стоящие на четных позициях.
№2 дано несколько предложений. Напечатать те слова каждого предложения которые отличаются от первого слова и имеют минимальную длинну

@кот Бегемот · 12.06.2010, 13:37

Сообщение от Trofik9

№1 Написать программу которая выводит на печать все слова, стоящие на четных позициях.

чего проще: занести все слова в строковый массив и циклом вывести элементы с чётными индексами:

Pascal
1
2
for i:=1 to k do
if a[i] mod 2=0 then writeln(a[i]);

@Trofik9 · 12.06.2010, 14:00 **[ТС]**

распиши весь код пожалуйста а то у меня со строковыми данными полный завал

@кот Бегемот · 12.06.2010, 14:04

Сначала уточни, чем разделяются слова в строке: пробелами, знаками препинания, или и тем, и другим

@Trofik9 · 12.06.2010, 14:04 **[ТС]**

пробелами

@кот Бегемот · 12.06.2010, 14:50

Сообщение от Trofik9

№1 Написать программу которая выводит на печать все слова, стоящие на четных позициях.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
a:array[1..100] of string;
k,i:integer;
s:string;
begin
writeln('vvedite stroku');
readln(s);
s:=' '+s;
for i:=1 to length(s)do
if s[i]=' ' then inc(k)else a[k]:=a[k]+s[i];
for i:=1 to k do
if i mod 2=0 then writeln(a[i]);
readln;
end.

@Trofik9 · 12.06.2010, 14:57 **[ТС]**

спасибо ,а сможешь решить вторую задачу

@кот Бегемот · 12.06.2010, 14:59

Хорошего понемножку, пусть другие поразомнутся.

@Trofik9 · 12.06.2010, 15:08 **[ТС]**

и на том спасибо

Новые блоги и статьи Все статьи Все блоги /
Символьное дифференцирование igorrr37 13.02.2026 / * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .

@Trofik9 0 / 0 / 0 Регистрация: 12.06.2010 Сообщений: 13

	Напечатать слова, стоящие на четных позициях 12.06.2010, 13:20. Показов 3189. Ответов 8 Метки нет (Все метки) №1 Написать программу которая выводит на печать все слова, стоящие на четных позициях. №2 дано несколько предложений. Напечатать те слова каждого предложения которые отличаются от первого слова и имеют минимальную длинну 0

@Trofik9 0 / 0 / 0 Регистрация: 12.06.2010 Сообщений: 13
	12.06.2010, 14:00 [ТС]
	распиши весь код пожалуйста а то у меня со строковыми данными полный завал 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	12.06.2010, 14:04
	Сначала уточни, чем разделяются слова в строке: пробелами, знаками препинания, или и тем, и другим 0

@Trofik9 0 / 0 / 0 Регистрация: 12.06.2010 Сообщений: 13
	12.06.2010, 14:04 [ТС]
	пробелами 0

@Trofik9 0 / 0 / 0 Регистрация: 12.06.2010 Сообщений: 13
	12.06.2010, 14:57 [ТС]
	спасибо ,а сможешь решить вторую задачу 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	12.06.2010, 14:59
	Хорошего понемножку, пусть другие поразомнутся. 0

@Trofik9 0 / 0 / 0 Регистрация: 12.06.2010 Сообщений: 13
	12.06.2010, 15:08 [ТС]
	и на том спасибо 0