Предмет: Информатика, автор: sunnykatherine

Программирование.Паскаль.
Дано слово вывести количество букв в слове

Ответы

Автор ответа: kshapran
2
допустим слово ввели в программу так
read(s); где s - переменная типа string
тогда для s справедливо выражение
a:=length(s); где a - переменная типа integer
библиотечная функция Length() возвращает длину строки.
А длина строки в свою очередь и есть кол-во букв в слове
Итак код
//-----------
program one;
var s:string;
a:integer;
begin
Write('Введите слово:');
readln(s);
a:=length(s);
write('Кол-во букв в слове=',a);
end.
Похожие вопросы
Предмет: Английский язык, автор: Аноним
ПЕРЕВЕСТИ ПИСЬМО НА АНГЛИЙСКИЙ ЯЗЫК:ЕСЛИ ВСЁ БУДЕТ ПРАВИЛЬНО,ТО Я ДОПЛАЧУ. ПЕРЕВЕСТИ ВОТ ЭТО ПИСЬМО:
Привет Олег.

Это Ваня, как у тебя дела? Извини, что так долго не писал, просто не было времени. Я слышал, что у тебя проблемы с учёбой. Давай как-нибудь встретимся, и я тебя познакомлю со своим другом, он поможет тебе с учебой.

Я тебе пишу по делу, и хочу тебя пригласить на Новый Год. В виде управляющего, а не гостя. Я бы хотел, чтобы мы сделали сюрприз всем гостям. Например, сделать вечеринку, а не просто сидеть за столом и молча есть. Украсить квартиру, а лучше устроить вечеринку на даче с шашлыком и костром. Будем рассказывать друг другу истории из жизни. Я хочу пригласить Олю, Никиту, Даню, Ксюшу и Диму. А кого хочешь пригласить ты? Нужно купить много всяких вкусностей, например: напитки, чипсы, торты, мясо и овощи для шашлыка и многое другое. Надо придумать, как всё это организовать. Я куплю украшения: огоньки,елку, игрушки для ёлки и др. И всем этим я украшу дачу. А ты должен пригласить интересных гостей на дачу. Ну, мы ещё все обудим при встрече.

Ладно, у меня больше нет времени писать, так как мне надо делать домашнее задание. И успехов тебе в учебе.

Твой друг,

Иван
Предмет: Математика, автор: kaktus1318