Циклы с постусловиями.
Разработать схему алгоритма и написать программный код на языке Паскаль. Используя оператор Repeat Until.
Приложения:
![](https://st.uroker.com/files/660/66022ae3d2366305073cb8fe43da11e6.png)
Ответы
Ответ дал:
0
var
i, n, y, x: real;
begin
readln(n, x);
repeat
y := y + power(x, n - i);
i := i + 1;
until (n < i);
writeln(y);
end.
i, n, y, x: real;
begin
readln(n, x);
repeat
y := y + power(x, n - i);
i := i + 1;
until (n < i);
writeln(y);
end.
Приложения:
![](https://st.uroker.com/files/4b2/4b26640437c598955e946f9e8a2a5397.jpg)
Вас заинтересует
1 год назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад