С, ! написать блок-схему и программу для № 115: дано натуральное число n. определить количество нулей среди всех цифр числа n. паскаль.

eio32120kopqicom eio32120kopqicom    1   23.01.2020 19:20    1

Ответы
ES2017 ES2017  11.10.2020 02:49

ответ:0

var a: string;

k,i:byte;

begin

write('введите число: '); readln(a);

k:=0;

for i:=1 to length(a) do begin

if a[i] = '0' then begin

k:= k + 1;

end; end;

write('количество нулей: ',k);

end.

0

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика