Арифметическое выражение – это запись математической формулы с использованием констант, переменных, функций, знаков арифметических операций и круглых скобок.
Знаки арифметических операций
+ (плюс) сложение
- (минус) вычитание
* (звёздочка) умножение
/ (следж) деление
** (две звездочки) возведение в степень.
Константы, переменные, указатели функций, а также выражения в круглых скобках называются операндами. Арифметическое выражение может присутствовать в правой части оператора присваивания, в списке фактических параметров при обращении к подпрограмме. Арифметические выражения используются при записи отношений.
ПРИМЕР: Записать на языке Фортран выражение
.
Т.к. требуется использовать цикл until, то значит требуется код на языке Паскаль.
1) цикл for
program p_for
var
p: real;
i, n: integer;
begin
readln(n);
p := 1;//начальное значение
for i := 1 to n do
p := p * i;
writeln(p);
end.
2) цикл while
program p_while
var
p: real;
i, n: integer;
begin
readln(n);
i := 1;
p := 1;//начальное значение
while i <= n do
begin
p := p * i;
i := i + 1;
end;
writeln(p);
end.
3) цикл until
program p_until
var
p: real;
i, n: integer;
begin
readln(n);
i := 1;
p := 1;//начальное значение
repeat
p := p * i;
i := i + 1;
until i > n;
writeln(p);
end.
Объяснение:
