Регистрация
777496
13.04.2023 22:51
Информатика
Есть ответ 👍

Номер 1 напечатать сумму элементов кратных одновременно двум или трем числового ряда 3, 6, 9, 2, 12, 2, 24 и 2 составить программу вычисления числового ряда для известного числа ряда n. y=(1-2/5)+(2+4/10)+(3-8/15)+(4+16/20)+

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

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

Киса11111112
Киса11111112
4,4(43 оценок)

program zadacha2;

  uses crt;

  var i,n,a: integer;

            b,y,c,l: real;

begin

clrscr;

readln(n);

  a: =1;

  b: =2;

  c: =5;

  for i: =1 to n do                                                                                          

                                                                                                  begin  

if a mod 2 = 0 then

l: =a+b/c

else          

l: =a-b/c;

a: =a+1;

b: =b+2;

c: =c+5;

y: =y+l;

                                                                                                    end;

writeln(y: 2: 2);

readkey;

  end.

первую по подробней расспишите

Kolodey200453
Kolodey200453
4,8(21 оценок)

ответ:

я не могу решить это не обижайся ок

Популярно: Информатика