цикл For, не врубаюсь Опции

[suriv]

Не совсем понятен мне цикл for

Код

{For I := 1 to 10 do  
Writeln(S)     -это и ежу понятно}

например:

Код

Begin  
For I := 1 to 10 do  
Begin  
For J := 1 to 10 do  
If I*J < 10 then Write(I*J, ' ')  
else Write(I*J, ' ');  
Writeln;

или

Код

For I := 1 to Length(S) do  
If S[I] = ' ' then Inc(Count);  
Write('Количество пробелов: ', Count);

а это так воще нереально для меня сделать (7 урок);

1 0 0 0 0 0 0 0 0
0 2 0 0 0 0 0 0 0
0 0 3 0 0 0 0 0 0
0 0 0 4 0 0 0 0 0
0 0 0 0 5 0 0 0 0
0 0 0 0 0 6 0 0 0
0 0 0 0 0 0 7 0 0
0 0 0 0 0 0 0 8 0
0 0 0 0 0 0 0 0 9

{В паскале сижу 2ой день поэтому и вопрос тупой}

3. Все исходники должны помещаться в теги...

Сообщение отредактировано: APAL - 27.10.2004 9:44

[Флогримм]

б-р-р-рр что-то свосем непойму; по-моему в нете больше чем достаточно литературы по программированию! поищи хотя на родном сайте форума;
попробуй вот это:
http://pascal.dax.ru/files/books/lecpas.zip
или вот это
http://www.programmerz.narod.ru/books/shenn.rar

должно подойти

Ты хочешь научится програмировать или что? Если певрое, тотебе нужна качественная литература, чтоб была всегда под рукой - бесплатная вещь есть, называется help, если денег жалко читай его, но не факт что поймешь

стопудово согласен, тык что мой совет, по ссылке http://pascal.dax.ru/files/books/tp7hlp_r.zip качай русский хелп на паскаль, если какая функция непонятна, наводи на нее курсор и жми ctrl+F1
вот так