Чему будет одинаково К после исполнения программки? Var I,k,x:interger; Begin X:=1000;

Чему будет равно К после исполнения программы? Var I,k,x:interger; Begin X:=1000; K:=0; While(xgt;0) do begin K:=k+x mod 10; X:=x-1; End; Writeln(k); End.

Задать свой вопрос
1 ответ
4500 -----------------------------------------------
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт