В паскале: Inc(n);
В С++: n++;
363 в восьмеричной системе<em />
<em>// PascalABC.NET 3.2, сборка 1431 от 28.04.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln(ReadSeqReal(3).Max)
end.
<u>Пример</u>
5.2 14 -1.156
14
Writeln предписывает вывести то, что записано у него в
скобках. ReadSeqReal(3) обеспечивает чтение трех чисел вещественного
типа с клавиатуры, а Max находит максимальное из них...
Если прописать в паскаль этот алгоритм через цикл while (цикл с <span>предусловием)</span>, то ответ будет B=25.
var a, b: integer;
begin
a := 2;
b := 0;
while a <> 7 do
begin
a := a + 1;
b := b + a;
end;
writeln(b);
end.