<span>1. </span>
<span><span> </span>DIM i, j, k AS INTEGER </span>
<span><span> </span>INPUT i, j, k </span>
<span><span> </span>IF i < j THEN </span>
<span><span> </span>IF i < k THEN PRINT i ELSE PRINT k </span>
<span><span> </span>ELSE </span>
<span><span> </span>IF j < k THEN PRINT j ELSE PRINT k </span>
<span><span> </span>END IF </span>
<span><span> </span></span>
<span><span> </span>2. </span>
<span><span> </span>DIM i, j AS INTEGER </span>
<span><span> </span>j = 0 </span>
<span><span> </span>FOR i = 12 TO 100 </span>
<span><span> </span>IF (i MOD 2) = 0 THEN j = j + i </span>
<span><span> </span>NEXT </span>
<span><span> </span>PRINT j </span>
<span><span> </span></span>или
<span><span> </span>j = 0 </span>
<span><span> </span>FOR i = 12 TO 100 STEP 2 </span>
<span><span> </span>j = j + i </span>
<span><span> </span>NEXT </span>
<span><span> </span>PRINT j </span>
<span><span> </span></span>
<span><span> </span>3. </span>
<span><span> </span>DIM i, j AS INTEGER </span>
<span><span> </span>j = 0 </span>
<span><span> </span>FOR i = 5 TO 10 </span>
<span><span> </span>j = j + i ^ 3 </span>
<span><span> </span>NEXT </span>
1. найти наименьшее из 3х чисел, введенных с Клавы
<span> </span>2. найти сумму четных чисел от 12 до 100
<span> </span>3. найти сумму кубов чисел от 5 (в кубе) до 10 (в кубе)
<span> </span>4. найти y=2x(в кубе) / 10 , если x меняется от 1 до 10, с шагом 0,5
<span> </span><span>PRINT j </span>
<span><span> </span></span>
<span><span> </span>4. </span>
<span><span> </span>DIM x, y AS INTEGER </span>
<span><span> </span>y = 0 </span>
<span><span> </span>FOR x = 1 TO 10 STEP .5 </span>
<span><span> </span>y = ((2 * x) ^ 3) / 10 </span>
<span><span> </span>PRINT y </span>