1. Определите значение переменной P после выполнения следующего фрагмента программы: 1 2 3 4 5 P:=2; i:=5; while i <= 15 do begin P := P * (i div 5); i := i + 1; end; Варианты: 1) 1 2) 64 3) 128 4) 32 2. Определите значение переменной S после выполнения следующего фрагмента программы: 1 2 3 4 5 S:=0; i:=7; while i > 1 do begin S := S + i div 2; i := i - 1; end; Варианты: 1) S = 0 2) S = 7 3) S = 12 4) S = 24
Var r1, r2: Integer;
Procedure S(r1, r2: Integer);
Var s: Real;
Begin
If r1 > r2 Then
s := Pi * (r1 * r1 - r2 * r2)
Else
s := Pi * (r2 * r2 - r1 * r1);
WriteLn('Площадь кольца: ', s:5:2);
End;
Begin
Write('r1 = ');
ReadLn(r1);
Write('r2 = ');
ReadLn(r2);
S(r1, r2);
ReadLn;
End.
Program TaskA;
Var r1, r2: Integer;
Function S(r1, r2: Integer): Real;
Begin
If r1 > r2 Then
result := Pi * (r1 * r1 - r2 * r2)
Else
result := Pi * (r2 * r2 - r1 * r1);
End;
Begin
Write('r1 = ');
ReadLn(r1);
Write('r2 = ');
ReadLn(r2);
WriteLn('Площадь кольца: ', S(r1, r2):5:2);
end.
Как это ни парадоксально, но то, что нам кажется, что в мире "нет справедливости", является в значительной степени следствием того, что в нем воплощается справедливость недоступного нашему пониманию уровня. Во-первых, Б-жественный суд принимает во внимание все существующие факторы и оценивает их по своей, абсолютной шкале. Во-вторых, чем хуже человек, тем снисходительнее Небеса к нему в этом мире относятся, чтобы таким образом избавиться от необходимости воздавать ему хоть что-то на том свете. И наоборот, к праведникам Небеса на этом свете предельно строги, чтобы приумножить, по возможности, награду на том свете.
Дополнительное обстоятельство – то, что Всевышний милостив. И Его справедливость, оставаясь абсолютной и неуклонной, при этом все-таки корректируется Его милостью и долготерпением. Как сказано, "не смерти грешника хочет Всевышний, но искоренения греха", а это иногда берет время.
Еще один фактор – предоставленная нам свобода выбора. Особенно, когда она помножена на наше природное несовершенство и склонность к греху. Если бы нас Небеса карали за каждый проступок – мы бы ходили по струнке, но с нами было бы неинтересно.
И подводя итог, процитируем Талмуд, который предостерегает нас от попыток разобраться в том, почему злодеи зачастую преуспевают в этом мире. Это не-пос-ти-жи-мо.