A[i] := i + 1;
PrintLn(a);
Println();
for i := 1 to 10 do
begin
A[i] := A[i - 1];
PrintLn(a);
end;
Println();
Println(2);
for i := 0 to 10 do
A[i] := i + 1;
PrintLn(a);
Println();
for i := 10 downto 0 do
begin
A[i] := A[10 - i];
PrintLn(a);
end;
end.
Тут вывод трасировок последних циклов
1
[1,2,3,4,5,6,7,8,9,10,11]
[1,1,3,4,5,6,7,8,9,10,11]
[1,1,1,4,5,6,7,8,9,10,11]
[1,1,1,1,5,6,7,8,9,10,11]
[1,1,1,1,1,6,7,8,9,10,11]
[1,1,1,1,1,1,7,8,9,10,11]
[1,1,1,1,1,1,1,8,9,10,11]
[1,1,1,1,1,1,1,1,9,10,11]
[1,1,1,1,1,1,1,1,1,10,11]
[1,1,1,1,1,1,1,1,1,1,11]
[1,1,1,1,1,1,1,1,1,1,1]
2
[1,2,3,4,5,6,7,8,9,10,11]
[1,2,3,4,5,6,7,8,9,10,1]
[1,2,3,4,5,6,7,8,9,2,1]
[1,2,3,4,5,6,7,8,3,2,1]
[1,2,3,4,5,6,7,4,3,2,1]
[1,2,3,4,5,6,5,4,3,2,1]
[1,2,3,4,5,6,5,4,3,2,1]
[1,2,3,4,5,6,5,4,3,2,1]
[1,2,3,4,5,6,5,4,3,2,1]
[1,2,3,4,5,6,5,4,3,2,1]
[1,2,3,4,5,6,5,4,3,2,1]
[1,2,3,4,5,6,5,4,3,2,1]
Подробнее - на -
Объяснение:
Поделитесь своими знаниями, ответьте на вопрос:
Нужно у логическое выражение по информатике
Питання для самоперевірки
1. Як визначити розмір вертикального відступу від тексту до границі браузера?
2. Як визначити розмір горизонтального відступу від тексту до границі браузера?
3. Як визначити колір тексту для всього документу?
4. Як визначити колір фрагменту тексту?
5. Як визначити шрифт, яким текст буде відображуватись у вікні браузера?
6. Як записати тег лінії з товщиною в 5 пікселів?
7. Чи можливо задати лінію товщиною в 200 пікселів?
8. Як записується тег заголовку 5 розміру з вирівнюванням по центру?
9. Як записується тег абзацу з вирівнюванням по лівому краю?
10. Яким чином задати обов’язкове відображення фрагменту тексту з нового рядка?