Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
djezhik
21.08.2021 00:00 •
Информатика
Дані строкового типу вивести ім'я, по батькові і кількість букв в прізвищі паскаль
Показать ответ
Ответ:
aru1608
06.10.2020 20:08
Можна так
var s,f,i:string;
begin
s:='Галкин Владислав Евгеньевич';
f:=copy(s,1,pos(' ',s)-1);
delete(s,1,pos(' ',s));
i:=copy(s,1,pos(' ',s)-1);
write('Фамилия - ',f,', кол-во букв в фамилии=',length(f)/2:1:0,'; Имя - ',i);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
anshul
17.05.2022 10:56
Дан одномерный массив.найти сумму элементов массива,значение которых падает в отрезок [2; 5] (массив предварительно заполнить с клавиатуры)...
Sophie9649
17.05.2022 10:56
Составьте программу которая а)выполняет операцию сцепления трех введенных с клавиатуры символов б)выполняет операцию сцепления трех введенных с клавиатуры символов...
БезликийNoName
22.07.2021 19:18
определите результат выполнения фрагмента программного кода на Python :. from random import randint a= [randit(50,100) for x in range(10)]...
igordergaysov
20.04.2021 22:09
5. Напишите как ввести переменную А строкового типа на языке Python...
nastyagru1
16.09.2022 06:34
Соотнеси пары, дополнив алгоритм создания программы движения робота по квадрату согласно схеме o15090При разработке программы начальныеЗначения гироскопического датчикадолжны...
AlinaAok
07.01.2022 10:56
Переведите число 145 из десятичной системы счисления в двоичную. * 100111011 Вариант 411100110010001...
nikitafonarik05
07.01.2023 20:21
Проведіть реакції йонного обміну між попарно взятими розчинами електролітів. Укажіть ознаки, які свідчать, що реакції відбулися між: а) натрій карбонатом і нітратною...
rusnaktaniusha
09.04.2023 03:41
1.какая династия правила в Англии в 16 веке?2.Три главных события этих правлений. 3.Кто провёл реформацию в стране? 4.Название реформированной церкви Англии. 5.Кто...
Gt78
13.08.2021 06:11
77-бет 2-тапсырма. Кестеде қай сөз бірнеше рет қайталанып тұр? Ол - табиғат құбылысының атауы. Сонымен бірге бұл кестеде тақырыпқа қатысты 6 сөз бар. Сол сөздерді тауып,...
ВеликийМаг2018
13.08.2021 06:11
Қазақ халқына тән екі қасиетті белгілеңіз. a) бауырмалдықb) жомарттықc) есепшілдікd) қонақжайлықe) саудагерлік...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var s,f,i:string;
begin
s:='Галкин Владислав Евгеньевич';
f:=copy(s,1,pos(' ',s)-1);
delete(s,1,pos(' ',s));
i:=copy(s,1,pos(' ',s)-1);
write('Фамилия - ',f,', кол-во букв в фамилии=',length(f)/2:1:0,'; Имя - ',i);
readln;
end.