1.
const N = 10;
var a: array [1..N] of integer;
i, x: integer;
begin
write('Введите x: ');
readln(x);
for i := 1 to N do
begin
a[i] := x + i - 1;
write(a[i], ' ');
end;
end.
2.
const N = 10;
var a: array [1..N] of integer;
i: integer;
begin
a[1] := 1;
a[2] := 1;
for i := 3 to N do
begin
a[i] := a[i-1] + a[i-2];
end;
for i := 1 to N do
begin
write(a[i], ' ');
end;
end.
3.
const N = 6;
var a: array [1..N] of integer;
i, x: integer;
begin
a[N] := 1;
for i := N-1 downto 1 do
begin
a[i] := 2 * a[i+1];
end;
for i := 1 to N do
begin
write(a[i], ' ');
end;
end.
Объяснение:
Есептеуіш техника — есептеу және мәліметтерді өңдеу процессінің маңызды компоненті болып табылады. Есептеуге арналған алғашқы құрал ретінде есептеу таяқшаларын атауға болады, бұл құрал қазіргі кезде де бастауыш сынып оқушыларын есепке үйрету үшін қолданылады. Даму жолында бұл құралдар күрделене түсті (мысалы, финикиялық саз фигуралары).
Уақыт өте келе, қарапайым құрылғылардан күрделі құралдар пайда бола бастады: абак, логарифмдік сызғыш, механикалық арифмометр, электронды компьютер. Алғашқы есептеуіш құрылғылардың қарапайымдылығына қарамастан, олармен жұмыс жасауға үйренген адам, қазіргі заманғы калькуляторларды пайдаланғаннан да жылдам есептер жүргізе алады. Әрине, қазіргі заманғы есептеуіш құрылғыларының жұмыс өнімділігі және есептеу жылдамдығы ең жылдам есептегіш адамның өзін шаң қаптырып кетеі.
