вычислить все значения и отыскать сумму вычисленных элементов для y=c-a, если

Вычислить все значения и отыскать сумму вычисленных частей для y=c-a, если а=2, шаг=1 и с принадлежит [-1,57;1,57]

Задать свой вопрос
1 ответ
Var
    c, y, a, h, s: real;

begin
    a := 2.0;
    h := 1.0;
    c := -1.57;
    
    repeat
        y := c - a;
        writeln(c:7:2, ' ', y:7:2);
        s := s + y;
        c := c + h;
    until c gt; 1.57;
    
    writeln(s);
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт