Question

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

Answer 1

только основная часть программы на паскале:
for i:=100 to 999
do begin
If (i div 100<((i mod 100) div 10)) and (((i mod 100) div 10)<i mod 10)
then s:=s+1;
end;
Если что, то inc(x) это увеличение числа х на 1, а inc(x,y) увеличение числа х на y

Answer 2

??))

Answer 3

Да

Answer 4

Я снизу написав общий вид

Answer 5

написал*

Answer 6

да, все верно

Answer 7

var i,s:longint;

begin
 s:=0;
 for i:=100 to 999 do
  If ((i div 100)<((i div 10) mod 10)) and (((i div 10) mod 10)<(i mod 10))
   then s:=s+1;
 writeln(s);
 readln
end.

Answer 8

Еще вопрос для общего развития? Что такое "longint"?) Я просто знаю только что такое "integer" и "real"

Answer 9

это тип данных переменной. Длинное целое число. То есть число, находящееся в диапазоне -2147483648..2147483647

Answer 10

в общем на подобии BigInteger если не ошибаюсь)

Answer 11

Есть несколько типой данных числовые и рядковые(или как они там) лонгинт(или долгое целое) один из числовых типов

Answer 12

Ооо, понятно. Спасибо !