Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Языки программирования > Pascal
Перезагрузить страницу Помогите пожалуста
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
VictorT VictorT вне форума
Новичок
 
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 26.10.2010
По умолчанию Помогите пожалуста - 02.01.2011, 17:13

Program l098;
uses crt;
var a,s:string;
c:char;
i,j:integer;
begin
clrscr; readln(s) ;
for i:=1 to lenght(s) do
case s[i] of
'A','B','C','D','E','F','G','H','I','J','K','L','M ','N','O','P','Q','R','S','T','U','V','W','X' :write(succ(s[i]));
else write(s[i]) end;
readln

end.

выдает ошибку:
неизвесный идентификаток lenght.
В чем проблема?
Ответить с цитированием
  (#2 (permalink)) Старый
*HellRaiser* *HellRaiser* вне форума
Member
 
Аватар для *HellRaiser*
 
Сообщений: 122
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 01.01.2011
По умолчанию 02.01.2011, 17:25

Наверно ж надо чему то присвоить
Pascal Код:
Program l098;
uses crt;
var a,s:string;
c:char;
i,j:integer;
begin
clrscr; readln(s) ;
for i:=1 to j := lenght(s) do
case s[i] of
'A','B','C','D','E','F','G','H','I','J','K','L','M ','N','O','P','Q','R','S','T','U','V','W','X' :write(succ(s[i]));
else write(s[i]) end;
readln;
end.
Ответить с цитированием
  (#3 (permalink)) Старый
X-Cite_Forever X-Cite_Forever вне форума
Member
 
Сообщений: 536
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 24.10.2006
По умолчанию 03.01.2011, 12:12

Что это за маразм?
Delphi Код:
for i := 1 to j := lenght(s) do
неизвесный идентификаток "lenght" - это значит, что неизвестное слово... Надо "length"!!!
Ответить с цитированием
  (#4 (permalink)) Старый
wince383 wince383 вне форума
Новичок
 
Сообщений: 2
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 17.01.2012
По умолчанию 17.01.2012, 16:27

мужики можете помч с такой прогой


измерить скорость вывода данных на диск
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите пожалуста) Хочу взять видеокарту GTX 560 + еще оперативы Cool4el Видеокарты 11 10.05.2012 23:15
помогите пожалуста oleg-200468 Любые вопросы от новичков 1 09.04.2012 07:13
помогите пожалуста wince383 Вопросы начинающих программистов 1 18.01.2012 10:47
Помогите пожалуста GODzy Любые вопросы от новичков 4 04.10.2011 16:27
Помогите пожалуста skant666 Любые вопросы от новичков 4 05.08.2011 15:12
Помогите Пожалуста!!!! Eclip Любые вопросы от новичков 8 02.07.2011 00:23
Помогите пожалуста!!! barhaton Видеокарты 1 21.03.2011 20:40
ПОМОГИТЕ ПОЖАЛУСТА! x-18 Видеокарты 6 30.07.2010 23:13
помогите пожалуста! apatche Pascal 1 13.05.2010 11:16
ПОЖАЛУСТА ПОМОГИТЕ Odissei Разное 0 19.09.2007 14:35
Помогите пожалуста. linivec Разное 0 13.09.2007 00:03
Помогите пожалуста. linivec Разное 0 13.09.2007 00:03



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов