Решение задачи 1 "Найти площадь кольца, внутренний радиус которого равен 20, а внешний – заданному числу r (r>20)". см в файле.
Решение задачи 2, "<span>Вычислить период колебания маятника длины L", для математического маятника, см файл задача 2.</span>
Var b,c:real;
<span>begin </span>
<span>b:=1; </span>
<span>c:=2; </span>
<span>repeat </span>
<span>b:=b+1; </span>
<span>c:=c*b; </span>
<span>until b=4; </span>
<span>writeln('Да'); </span>
<span>end. </span>
1+1=2; 2*3=6; 6-1=5(кормим); 5*3=15; 15+1=16;
1==>2==>6==>5==>15==>16.
ответ: 13231
Выводятся такие значиния
k= 1 p=120
j=10 s= 20 j=11 s= 42 j=12 s= 66 j=13 s= 92 j=14 s= 120 j=15 s= 150
var a,b:integer;
Begin
randomize;
a:=random(99);
writeln('Дополните ', a);
read(b);
if (a+b=100) then writeln(':-)')
else writeln(':-(');
end.