Дано натуральное число. верно ли, что в его записи встречается цифра 3?

163

433

Посмотреть ответы 3

Ответы на вопрос:

Merser2212

Информатика

4,4(41 оценок)

Program p; var x: longint; t: boolean; begin write('введите натуральное число, х = '); readln(x); while x< > 0 do begin if x mod 10 = 3 then t: =true; x: =x div 10; end; if t=true then writeln('да, встречается') else writeln('нет, не встречается'); end.

Karina11222

Информатика

4,7(54 оценок)

Если я не ошибаюсь, то натуральные числа идут от 1-до бесконечности! а 0 это не натуральное! натуральное число можно узнать при счете например яблок! 0 яблок значит их совсем нету а если 2 яблока уже есть!

жангул1

Информатика

4,4(23 оценок)

// pascalabc.net 3.1, сборка 1192 от 07.03.2016 begin var a: =arrrandom(15,0,200); a.println; writeln('max=',a.max,', min=',a.min); writeln('кол-во меньших 10 равно ',a.where(x-> x< 10).count); writeln('кол-во четных равно ',a.where(x-> x.iseven).count) end. тестовое решение: 122 186 121 46 21 140 71 145 177 89 8 64 115 10 56 max=186, min=8 кол-во меньших 10 равно 1 кол-во четных равно 8