Войти Регистрация Спроси ai-bota

Abc pascal найти количество нулевых цифр строки.

Ответ:

kolesnikov20021

06.10.2020 13:59

PascalABC.NET 3.2
begin
Writeln(ReadString.Where(x -> x = '0').Count);
end.

Пример ввода:

Пример вывода:
1

0,0(0 оценок)

Популярные вопросы: Информатика

Stepan0305

01.09.2021 13:59

Дан целочисленный массив , элементы которого неотрицательны. необходимо заполнить таблицу действительных чисел , i-ый элемент которой равен среднему арифметическому первых...

артемий59

24.07.2020 10:41

Даны натуральное число n, действительные числа . в этой последовательности заменить все элементы меньше 2, нулем. кроме того, получить сумму элементов принадлежащих отрезку...

диана2263

24.07.2020 10:41

Переведите целые числа из десятичной системы счисления в восьмеричную 513 600 2010...

MishaDen3009

25.10.2020 21:58

Для представления числовых данных используют 32-ичный алфавит, включающий знаки действий. сколько байтов информации содержит выражение 5*5=25?...

jaredletoo

27.08.2022 15:32

Задать целочисленную таблицу , состоящую из различных чисел интервала [-. найти разность наибольшего и наименьшего элементов и указать номер наибольшего элемента....

Нюйва

09.10.2020 07:14

1. укажите лишнее: a) собака.doc b) дом.bmp c) уроки.txt d) каникулы.rtf 2. укажите графический файл: a) зима.wav b) весна.doc c) лето.jpg d) осень.mid...

tunekoff228

14.12.2021 17:23

Составьте сложное и длинное логическое выражение,а также составьте для него таблицу истинности...

novoselova959

19.02.2023 22:16

Определите значение переменной c после выполнения следующего фрагмента программы (записанного ниже на разных языках программирования): a = -10 b = 20 a = b - 2 if a b...

alexxxxarchenko

05.08.2022 19:14

Найдите ошибку: program prim2; var x,y: real; begin for x: =-10 to 10 do begin y; =sqr(x); writeln(x, , y) end; end....

DennisWhitel

05.08.2022 19:14

Определите значение переменной c после выполнения следующего фрагмента программы (записанного ниже на разных языках программирования): бейск a = -10 b = 20 a = b - 2...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку