Тема «Циклические алгоритмы»
Цикл со счетчиком
1. Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы?
a:=10;
for i:=1 to 2 do begin
a:=a-2;
end;
2. Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы?
a:=3;
for i:=1 to 2 do begin
a:=a+a;
end;
3. Какое число будет выведено на экран после выполнения этого фрагмента программы?
write(1);
for i:=3 to 5 do
write(i);
Цикл с предусловием
1. Сколько раз будет выполнен этот цикл?
i:=5;
while i<5 do begin
writeln('Привет!');
i:=i+1;
end;
2. Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 2 раза?
i:=1;
while i<=... do begin
writeln('Привет!');
i:=i+1;
end;
3. Какое число будет выведено на экран в результате выполнения этого цикла?
i:=1;
while i<5 do begin
write(i);
i:=i+1;
end;
Цикл с постусловием
Чему будет равно значение переменной «a» после выполнения этого цикла?
i:=3;
a:=12;
repeat
a:=a+i;
i:=i+1;
until (i>3);
Какое число нужно написать вместо многоточия, чтобы цикл выполнился ровно 4 раза?
i:=...;
repeat
writeln('Привет!');
i:=i+1;
until (i=9);
Какое число будет выведено на экран в результате выполнения этого цикла?
i:=6;
write('9');
repeat
write(i);
i:=i+1;
until (i>5);
- Равнобедренный треугольник - это треугольник, у которого две стороны равны между собой.
- Равносторонний треугольник - это треугольник, у которого все стороны равны между собой.
- Разносторонний треугольник - это треугольник, у которого все стороны имеют разную длину.
2. Составим алгоритм программы:
(см. рисунок).
3. Напишем программу, которая будет определять, является ли треугольник: равнобедренным, равносторонним или разносторонним:
var a,b,c: Integer;
begin
writeln('Введите длину стороны a');
readln(a);
writeln('Введите длину стороны b');
readln(b);
writeln('Введите длину стороны c');
readln(c);
if (a=b) and (a=c) and (b=c) then writeln('Треугольник - равносторонний') else
if (a<>b) and (a<>c) and (b<>c) then writeln('Треугольник - разносторонний') else
writeln('Треугольник равнобедренный');
end.
1. Находим количество точек (пикселей) в кадре 640×480 = 307200
2. Находим размер палитры 250×1024×8/307200 = 6 бит (отбрасываем дробную часть после деления)
3. Количество цветов в палитре не может превышать 2⁶ = 64
Пояснение: 250 Кбайт = 250×1024 байт = 250×1024×8 бит.
Задача 2.
1. Находим объем исходной палитры
256 = 2⁸, поэтому объем составит 8 бит
2. Находим объем новой палитры
2=2¹, поэтому объем составит 1 бит.
3. Находим, во сколько раз уменьшится объем файла
8/1=8 - в восемь раз.
4. Если первоначальный объем был Х, то новый станет Х/8. Уменьшение объема составит X-X/8 = 7X/8 и это равно 7 Кбайт.
Тогда 7Х=7*8 Кбайт, откуда Х=8 Кбайт