Помогите пж перевести программку на оператор for

Помогите пж перевести программку на оператор for

Задать свой вопрос
1 ответ

Program n_1;

var n, k, f:integer;

begin

   read(n);

   f:=1;

   for k:=1 to n do f:=f*k;

   writeln(f);

end.

Вадим Маркамов
Спасибо)
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт