tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Из 4 введенных с клавиатуры
Из 4 введенных с клавиатуры чисел вывести на печать количество четных чисел, больших 3. pascal/10 класс
ывцым
2 16.08.2019 10:50
3
Ответы
Катенька231
04.10.2020 22:44
Var kol,x,i:integer;
begin
for i:=1 to 4 do begin
read(x);
if (x>3) and ((x mod 2) = 0) then inc(kol);
end;
writeln(kol);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
beyn1oyc4cd
08.09.2019 09:50
Нужно модем передает информацию со скоростью 127000 бит в секунду за какое время можно передать текст объемом 256000 килобайт...
Vi0002
08.09.2019 09:50
За какое время (в сек) будет передан фаил размером 64 кбайт через соединение со скоростью 1024 бит в секунду...
MrThomasFeed
08.09.2019 10:00
Напишите алфавит восьмеричной системы счисления...
yourbae
17.05.2021 05:39
Бывают MacroSD и MicroSD (По характеристике определиноситель информации) *О OОптический дисковый носительЖесткий магнитный дискОФлеш-накопитель (USB)ОГибкие магнитные диски...
diana15152
17.05.2021 05:37
чтобы изменить параметры страницы на альбомный или книжный вариант в текстовом редакторе ворд, следует выполнить команду:...
Nastya1111113466
25.04.2021 16:46
В чем заключаются различия в выполнении основных алгоритмических структур: следование, ветвление, цикл со счетчиком и цикл с предусловием...
Мія111
22.02.2021 12:01
Укажите переменные, имена которых записаны с ошибкой Верных ответов: 3 a2b2 _AbBa бasik 3Wheel Ab_Ba “barbos”...
Биіккесамға
22.02.2021 12:02
Ребят это я такая тупая или что элементарное не могу сделать кто знает может...
timekid
22.02.2021 12:03
Анализируем и сравниваем прируемлнорарынаваем:Сравни данные объекты вставки. Определи их сходстваи различия.Видеок...
57Nika57
17.05.2019 21:50
Для какого из указанных значений числа x истинно высказывание (х 4) v (x 5) & (x 3)...
Популярные вопросы
Составьте небольшой рассказ по картинке...
1
Знайти похідну функції g(x)=x^2+1/x-2...
1
Расшифруйте марку электрода...
2
АЙТЫЛЫМ -тапсырма. 8 Жұмбақтарды шеш. Канаты жок, ушады, - Аягы жок. кашады....
3
переведите текст, только не с переводчика, там не правильно...
3
ів.. Реферат на тему.. «Чи зміг би Архімед зрушити Землю? » Потрібно сочно...
2
Текст: Время читать! 4. Ниже приведён фрагмент текста. Перечитайте его...
3
Яким відокремленим членом речення є виділені в реченні слова? І сон мене...
3
Чому у карбонових кислот кислотні властивості виражені яскравіше , ніж...
1
Географічна оболонка завдовжки ... км...
1
begin
for i:=1 to 4 do begin
read(x);
if (x>3) and ((x mod 2) = 0) then inc(kol);
end;
writeln(kol);
end.