<span>Пример 1. Квадраты чисел от 2-х до 10-и.
</span>for x:=2 to 10 do WriteLn(x*x);
<span>Пример 2. Латинский алфавит.
</span>for ch:='A' to 'Z' do Writeln(ch);
<span>Пример 3. Использование цикла с downto.
</span>for i:=10 downto 1 do WriteLn(i);
<span>Пример 4. Использование составного оператора.
</span><span>for x:=1 to 10 do begin
y:=2*x+3;
WriteLn('f(',x,')=',y);
end;
</span>
Пусть видеопамять компьютера имеет объем 512 кБайт. Размер графической сетки - 640 х 480. Сколько страниц экрана одновременно разместится в видеопамяти при палитре из 16 цветов; 256 цветов?
Для 16 (2^4) цветов нужно 4 бита на пиксель, для одного экрана нужно 640*480*4=1228800 бит=153600 байт, память 512*1024=524288 байт, посчитаем 524288 /153600=3,41333 т.е. 3 страницы.
Для 256 (2^8) цветов нужно 8 бит на пиксель, для одного экрана нужно 640*480*8=2457600 бит=307200 байт, память 512*1024=524288 байт
524288 /307200=1,70667 т.е. 1 страница.
<span>Вложенный оператор применяется в тех случаях, когда для выполнения действия требуется соблюдение сразу нескольких условий, которые не могут быть указаны в одном условном выражении</span>
// PascalABC.NET 3.1, сборка 1192 от 07.03.2016
begin
var a:=ArrRandom(10,-40,40); a.Println;
a.SortedDescending.Println
end.
<u><em>Тестовое решение:</em></u>
20 -32 1 3 0 21 -14 21 32 -6
32 21 21 20 3 1 0 -6 -14 -32
Дизайн ідея програмування тести
