profile
Опубликовано 5 лет назад по предмету Информатика от Аккаунт удален

Ученик в первый день выучил 5 англисских слов.В каждый следующий день он выучивал на 2 слова больше,чем в предыдущий.Сколько англисских слов выучит ученик в 10 дней занятий???.Составьте алгоритм или программу!!

  1. Ответ
    Ответ дан timscal
    Подправлю если найду ошибку, но пока может так? Сейчас проверю.
    Program tt;
    var z,x,N:integer;
    BeginN:=1;
    x:=5;
    while N<9 do begin
    z:=x+2;
    x:=x+z;
    N:=N+1;
    end;
    Writeln (z);
    end.
    1. Ответ
      Ответ дан Аккаунт удален
      хорошо
    2. Ответ
      Ответ дан timscal
      Посчитал вручную и если правильно понял задачу так верно:
      Program tt;
      var z,x,N:integer;
      Begin
      N:=1;
      x:=5;
      while N<11 do begin
      z:=x+2;
      x:=x+z;
      N:=N+1;
      end;
      z:=z-2;
      Writeln (z);
      end.
    3. Ответ
      Ответ дан Аккаунт удален
      спасибо
    4. Ответ
      Ответ дан timscal
      Прошу прощения, правда, очень виноват, всё решается по формуле суммы арифметической прогрессии. Я совсем не так понял задачу я складывал слова которые были выучены и в первый день и во второй вместе и т.д. Простите.
      С While это можно решить так.
      Program tt;
      var x,h,k,N:integer;
      z:real;
      Begin
      k:=2;
      h:=10;
      x:=5;
      while N<h do begin
      z:=(2*x+(h-1)*k)*0.5;
      N:=N+1;
      end;
      z:=z*10;
      Writeln (z);
      end.