Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
olgaocher
29.09.2022 01:24 •
Информатика
Pascal дана строка в которой насколько слов. найти длину первого слова
Ответ:
zarina183
01.10.2020 13:16
var
str:string;
p:integer;
begin
readln(str);
p:=pos(' ',str);
writeln(p-1);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
sc8054456p08m25
19.03.2023 11:53
Сравните: 1)7d5 в шестнадцатеричной и 11010001111 в двоичной 2)1011 в двоичной и 4a5 в шестнадцатеричной 3)76 в восьмеричной и 19 в десятичной подробное !...
nikita2003201711
19.03.2023 11:53
9какую запись нельзя считать формулой электронной таблицы? a) a5 c3*n2 b) = a5+ b2*d4 c) y1 = a5+b2*d4 d) a5 + x2x3...
UlianaIvleva
19.03.2023 11:53
Создайте программу для вычисления силы тока на участке электрической цепи сопротивление r[oм] и напряжением u[в], при напряжении 220 в и 110в! не знаю, как решить! через if...
millykot2003
19.03.2023 11:53
Представьте число 63_10в беззнаковом 8-разрядном формате...
Марьванна567
09.11.2021 02:44
Цветное(с палитрой из 1024 цветов)растровое графическое изображение имеет размер 50×40 точек. Какой Объём памяти займёт это изображение в битах?В ответе укажите только число....
Nastay1234899
19.02.2022 18:31
Отметьте достоинства структуры «звезда». 1) защита данных лучше, чем для шиннойструктуры; 2) простота и дешевизна;3) небольшой расход кабеля;4) при неисправности любого компьютера...
guskovzahar2011
19.02.2023 20:02
Программирование 9 класс Массивы Программа через паскаль...
senchaignatov
03.02.2020 04:15
)маму школьника вызвали в школу. она точно знает, что ее вызывали учителя , , и биологии • учителей зовут дина давыдовна, галина георгиевна, татьяна тихоновна и клавдия константиновна...
ayzilyamannano
22.04.2022 11:33
Напишите как расшифровать код цезаря...
binfather
17.02.2023 06:21
Лыжник пробежал в 1 день 10 км, каждый следующий день он пробегал на 10% больше. определить в какой день он пробежит 20 км, в какой день суммарны пробег превысит 200км решить...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
str:string;
p:integer;
begin
readln(str);
p:=pos(' ',str);
writeln(p-1);
end.