Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Pechenka100500
19.04.2022 21:55 •
Информатика
Вводить с клавиатуры числа, пока не будут введен 0. найти количество введенных чисел.
Показать ответ
Ответ:
vika10092005
01.10.2020 11:25
Var
i,x:integer;
begin
i:=0;
while x<>0 do
begin
readln(x);
i:=i+1;
end;
writeln(i);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
viliam3486
28.04.2023 19:09
Играют двое. первый участник игры называет произвольное целое положительное число, не превышающее десяти, то есть он может назвать число десять и всякое меньшее десяти...
миру3
28.04.2023 19:09
100 нужно решить по информатике 8-9 класс 2. файл раз¬ме¬ром 9 кбайт пе¬ре¬даётся через не¬ко¬то¬рое со¬еди¬не¬ние за 36 се¬кунд. опре¬де¬ли¬те, за сколь¬ко се¬кунд...
муліка22
09.04.2022 13:07
Введите 2 числа a ,b выведите на экран порядковый номер меньшего из них...
Angelina1409
02.08.2021 00:39
Чим відрізняється дії відповісти і переслати...
donamigo2012
28.04.2021 11:22
Для чого використовують адресну книгу ? які переваги їївикористання...
abereziuk2017
01.02.2023 15:12
Для чого використовують адресну книгу ? які переваги її використання...
Настя61391
10.06.2022 13:18
Составим логическое уравнение, которое истинно только тогда, когда хотя бы одно из чисел а в с больше 0. используем оператор or: (a 0)or(b 0)or(c 0) составить программу....
ilyamilovanov1
18.07.2020 12:59
Много . 1) найти разность между двоичными числами 1100110 и 11101 2) найти разность между двоичными числами 100100 и 1010...
yuralavrenov2016
14.08.2020 06:53
11. устройство для взаимосвязи одной эвм с другими: а) сканер b) видеокарта c) процессор d) адаптер...
OPTIMIST777
01.06.2022 04:49
Три друга егор, игорь и роман живут в разных городах: москве, воронеже и волгограде. и учатся на разных факультетах: , и биологическом. егор учится не в москве и не...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,x:integer;
begin
i:=0;
while x<>0 do
begin
readln(x);
i:=i+1;
end;
writeln(i);
end.