Что такое Length, String, Char, Longint?

[Vadim123456]

Сообщение от profi

Vadim123456 тебе ОДИНОЧЕСТВО В СЕТИ все написала. Что не так?

Я не очень это понимаю. Можете на примерах объяснить? Программу с коментариями.

[ОДИНОЧЕСТВО В СЕТИ]

Я не очень это понимаю. Можете на примерах объяснить? Программу с коментариями.

Книжку берем и читаем.
какую? любую из серии "Паскаль для чайников"

[profi]

uses crt;

var
str : String;
c : Char;
n : Longint;

begin clrscr; // очищаем экран

str:='My string'; // инициализация переменных
c:='c';
n:=777;

writeln('String: ', str, '; Length: ', Length(str)); // выводим строку и её длину
writeln('Char: ', c); // выводим символ
writeln('LongInt: ', n); // выводим число

readln;// ждем нажатия клавиши
end.

[Vadim123456]

Например:
Дано предложение. Между словами предложнеия пробел, а после последнего слова точка. Подсчитать количество слов в предложении.

Program gg;
Uses crt;
Var
st:string;
k,i,n:integer;
begin
k:=0;
Clrscr;
Writeln ('Vvedite predlojenie');
Readln(st);
n:=length(st);
For i:=1 to N do
Begin
If (st[i]=' ')then
k:=k+1;
End;
Writeln ('Kol-vo slov v stroke',k+1);
Readln;
End.

Я этого не проходил в школе.
n:=length(st); можно чем нибудь заменить?

[profi]

Убери

n:=length(st);

и напиши так

For i:=1 to length(st) do

[Vadim123456]

Сообщение от profi

Убери

n:=length(st);

и напиши так

For i:=1 to length(st) do

Выделенное обязательно использовать? Просто я этого не проходил.

[ОДИНОЧЕСТВО В СЕТИ]

i:=1;
while st[i]<>'.' do
begin
If (st[i]=' ')then
k:=k+1;
i:=i+1;
end;

[Vadim123456]

Сообщение от ОДИНОЧЕСТВО В СЕТИ

i:=1;
while st[i]<>'.' do
begin
If (st[i]=' ')then
k:=k+1;
i:=i+1;
end;

Так программа работает не правильно. Я написал предложение из трёх слов, а программа пишет 6. И вообще я не понимаю, что взяли за st и i в этой программе.

[Alex Cones]

Сообщение от Vadim123456

Writeln ('Vvedite predlojenie');
Readln(st);

я не понимаю, что взяли за st и i в этой программе.

Тяжелый случай. Программу видимо писали не вы, а кто-то другой. Вот и обратитесь к нему, раз не можете сами понять, что st - это строка, которая вводится.

[Vadim123456]

Если бы я её писал сам я бы не спрашивал. А я хочу разобраться как это делать. Объясняю же, мы это в школе ещё не проходили.

Alex Cones
IC,BWC? NC...
Профессионал - тяжёлый случай бодаться с новичками!