составить программу, печатающую значение 1, если указанное высказывание является истинным, и 0 в противном случае: цифры данного двузначного числа N образуют строго возрастающую последовательность
Ответы
Ответ дал:
0
Реализация на паскале:
var n:integer;
begin
repeat
readln(n);
until (n > 9) and (n < 100);
if n mod 10 > n div 10 then writeln('1')
else writeln ('0');
end.
var n:integer;
begin
repeat
readln(n);
until (n > 9) and (n < 100);
if n mod 10 > n div 10 then writeln('1')
else writeln ('0');
end.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад