Сколько трехзначных чисел одинаково xpascal

Сколько трехзначных чисел одинаково x
pascal

Задать свой вопрос
1 ответ
Uses crt;var i,j,k:0..9;    kol:integer;beginkol:=0;For i:=1 to 9 do For j:=0 to 9 do  For k:=0 to 9 do  if (i+j+k)=10 then inc(kol);writeln('Result: ',kol);end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт