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

3.9 задание плиз))))))

Приложения:

Ответы

Автор ответа: allangarsk

var im, fa, ot,po :string; i:integer;f:char; begin write('Введите Имя пользователя '); readln(im); write('Введите фамилию пользователя '); readln(fa); write('Введите отчество пользователя '); readln(ot); po:= im + ' ' + fa + ' ' + ot; I:= po.Length; writeln('полном имени пользователя = ',po); write('количество символов = ',i); end.

sashutapogodin: I:=po.length; выдаёт ошибку

allangarsk: где открывает? какой паскаль?

allangarsk: I:=Length(po); попробуй если turbo pascal

allangarsk: http://www.pascal.helpov.net/index/pascal_lines_and_chars_programming

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Физика, автор: boyarchukdianaaa

поможіть!!! СРОЧНОО ПОМОЖІТЬЬ

6 лет назад

Предмет: Психология, автор: anonimys402

Вставить пропущенные слова Мы в ответе за .............., благодаря которым можем радоваться каждому дню. Мы в ответе за .............., которая даёт условия для нашей жизни. . Мы в ответе за ............, которых привязали к себе. Мы в ответе за тех , кого мы ................... Мы авторы своей ....
Слова для справок: приручили, жизни, родителей, друзей и любимых, природу