40 , . 1.выведите на экран кубы n первых натуральных чисел; 2.составьте программу, которая вычисляет сумму всех четных, двузначных чисел; 3.дано натуральное число n. вычислите 3n; 4дано натуральное число n. получить наименьшее число вида 2r, превосходящее n.

122

255

Посмотреть ответы 2

Ответы на вопрос:

kkostova

Информатика

4,8(31 оценок)

1. var n,i: integer; begin readln(n); for i: =1 to n do writeln(i,' ',i*i*i); end. пример: 4 1 12 83 274 642.var s,i: integer; begins: =0; for i: =10 to 99 do if i mod 2=0 then s: =s+i; writeln('s = ',s); end.результат: s = 24303.var n: integer; beginreadln(n); writeln('3 * ',n,' = ',3*n); end.пример: 53 * 5 = 154.var n: integer; beginreadln(n); writeln(n+1+(n+1) mod 2); end.пример: 810