Question

Составить программу Паскаль ,которая выводит последовательность из 10-ти чисел по формуле i^2+2i дробь на 10​

Answer 1

program spmp;

uses

crt;

var

i: integer;

var

f: real;

begin

for i := 1 to 10 do

begin

f := (sqr(i) + 2 * i) / 10;

writeln(f);

end;

readln;

end.

Answer 2

Конечно! Вот пример программы на языке Паскаль, который выводит последовательность из 10 чисел, рассчитанных по формуле (i * i + 2 * i) / 10:

pascalCopy code
program SequenceCalculation;

var
  i: Integer;
  result: Real;

begin
  for i := 1 to 10 do
  begin
    result := (i * i + 2 * i) / 10;
    writeln('Число ', i, ': ', result:0:2);
  end;
end.

При запуске этой программы она выведет следующую последовательность:

yamlCopy code
Число 1: 0.30
Число 2: 0.60
Число 3: 1.20
Число 4: 2.00
Число 5: 3.00
Число 6: 4.20
Число 7: 5.60
Число 8: 7.20
Число 9: 9.00
Число 10: 11.00

Каждое число выведено с округлением до двух знаков после запятой. Обратите внимание, что в Паскале индексация массивов и циклов начинается с 1, поэтому цикл for начинается с 1 и проходит до 10.

Надеюсь, это поможет вам! Если у вас возникнут дополнительные вопросы, не стесняйтесь задавать.