tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Склавиатуры вводится
Склавиатуры вводится последовательность чисел, 0 конец последовательности. посчитать сколько введено четных чисел. нужно составить программу для паскаль
хах24
2 14.06.2019 07:40
1
Ответы
cfif20042
10.07.2020 23:17
Var x,y:integer;
begin
repeat
readln(x);
y := y + 1 - (x mod 2);
until x = 0;
writeln(y);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
may12312
20.05.2021 07:08
прямое форматирование применяется при 1 работе с фрагментами текста 2 выбор стиля оформления документа 3 установка отступов первой строки во всём документе ...
asimagasanova
12.05.2020 14:28
5. Какие опции содержатся в окне программы CMOS SETUP? 6. Настройка основных устройств с С какой целью выполняется фиксация опций CMOS SETUP? 8. Могут повлиять изменения в CMOS...
mishtal2017
12.05.2020 14:29
Ниже в табличной форме представлен фрагмент базы данных о результатах тестирования учащихся (используется стобалльная шкала)....
7гогого7896шол
12.05.2020 14:29
Дано: fori:=1to58doПри первом выполнении тела цикла i=...
MCKiri4PrO
12.05.2020 14:28
Пацаны, кто может я играл с читами в Unturned прилетел вак и теперь всегда когда запускаю даже с других аккаунтов в стиме игру без чита (даже в папке с игрой нету) прилетает...
умнаясобачка
12.05.2020 14:28
Яку групу потрібно обрати для створення підпрограми в середовищі Скретч...
zulfiya22
08.12.2020 00:40
складіть алгоритм установлення орієнтації тексту у клітинках В2:Е2 деякої електронної таблиці під кутом 45 градусiв...
roman2016volko
08.12.2020 00:32
с 3 и ото для меня это тяжело...
pait
08.12.2020 00:31
Заполните таблицу i (вес одного символа/информационный вес символа) БИТ 3 4 5 К(Кол-во символов) 45 35 25 i (размер файла/информационный объем текста) БАЙТ - - -...
MrDog2005
08.12.2020 00:31
решить задачу на Python Клавиатура (Время: 1 сек. Память: 16 Мб Сложность: 11%) Для данной буквы английского алфавита нужно вывести справа стоящую букву на стандартной клавиатуре....
Популярные вопросы
с решением. Задача на картинке)...
1
Мощность экспозиционной дозы γ-излучения на расстоянии 40 см от точечного...
3
Даны векторы b {3;1; -2} и c {1;4; -3} найдите координаты a = 2b - c...
1
При прочих равных условиях сдвиг влево кривой спроса на труд работника, занятого...
2
Проверьте, правильно ли изложены резолютивные части в решениях суда: Признать...
1
решить задачу физика электричество...
2
На рисунке изображен график функции y=f(x) и касательная к нему в точке с...
3
Закончите уравнение реакции AI2O3 + KOH →...
2
Есть книги, без которых можно спокойно прожить. Есть телевизор, есть газеты,...
3
3. Решите неравенство: ′() 0, если f (x)=3x-5x^2+x^3...
2
begin
repeat
readln(x);
y := y + 1 - (x mod 2);
until x = 0;
writeln(y);
end.