Есть ответ 👍

Вычислить 1*2+2**(n+1) паскаль цикл while

158
447
Посмотреть ответы 2

Ответы на вопрос:


Var   n: integer;   ans: int64; begin   readln(n);   ans : = 1; n: =n+1;   while (n > 1) do   begin       ans : = ans * n;       n : = n - 1;   end;   writeln(ans); end. пример: 2 6

Яв паскале не силён, но если mod - это остаток от деления тоо if(m mod n == 0 and(& & ) n mod m = 0) то да в синтаксисе ошибки наверное, подправь, но думаю идею ты понял

Популярно: Информатика