miss1380
?>

Начав тренировки, спортсмен в первый день пробежал 10 км. каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. какой суммарный путь пробежит спортсмен за 7 дней? составьте программу и блок схему.

Информатика

Ответы

menametov

Компьютерные технологии или Информационные технологии (ИТ) — это обобщённое название технологий, отвечающих за хранение, передачу, обработку, защиту и воспроизведение информации с использованием компьютеров. Невозможно представить себе современные области производства, науки, культуры, спорта и экономики, где не применялись бы компьютеры. Компьютеры помогают человеку в работе, развлечении, образовании и научных исследованиях.

Компьютерные технологии — это передний край науки XXI века.

Объяснение:

Sidorenko

Відповідь:Program A_1;

uses crt;

Var

  i,n,sum: integer;

begin

  write('Введите N ');

  readln(n);

  i:=0;

  sum:=0;

  repeat

    i:=i+1;

    sum:=sum+i;

  until i=n;

  writeln('Сумма чисел от 1 до ',n,' равна ',sum);

end.

Program B_2;

uses crt;

Var

  i,n,sum: integer;

begin

  write('Введите N ');

  readln(n);

  i:=0;

  sum:=0;

  repeat

    i:=i+1;

    sum:=sum+i*i;

  until i=n;

  writeln('Сумма квадратов чисел от 1 до ',n,' равна ',sum);

end.

Program V_3;

uses crt;

Var

  i,n,sum: integer;

begin

  write('Введите N ');

  readln(n);

  i:=0;

  sum:=0;

  repeat

    i:=i+1;

    if (i mod 2 = 0) then sum:=sum+i;

  until i=n;

  writeln('Сумма чётных чисел в диапазоне от 1 до ',n,' равна ',sum);

end.

Program G_4;

uses crt;

Var

  i,n,sum: integer;

begin

  i:=9;

  sum:=0;

  repeat

    i:=i+1;

    sum:=sum+i;

  until i=99;

  writeln('Сумма всех двузначных чисел равна ',sum);

end.

Пояснення:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Начав тренировки, спортсмен в первый день пробежал 10 км. каждый день он увеличивал дневную норму на 10% нормы предыдущего дня. какой суммарный путь пробежит спортсмен за 7 дней? составьте программу и блок схему.
Ваше имя (никнейм)*
Email*
Комментарий*