Заполните таблицу,в каждой строке одно и тоже произвольное число( число может содержать как целую,так и дробную часть)должно. 111101,1; 13,54; 46,562; 59,В

272

478

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

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

almar80

Информатика

4,6(65 оценок)

Pascalabc.net 3.3.5, сборка 1660 от 20.04.2018 внимание! если программа не работает, обновите версию! function kod(n: integer): integer; begin (n,result): =(abs(n),0); while n> 0 do begin var d: =n mod 10; if d.isodd then result+=1; n: =n div 10 end end; // демонстрация работы begin writeln('нечетных чисел в числе: ',kod(readinteger('n=' end.