tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Ввести число если оно четное
Ввести число если оно четное кратное 7 и не кратное 5 то увеличить его на 6
ник5030
2 26.06.2019 23:20
0
Ответы
NikulinStasFrost
21.07.2020 16:18
Var a:integer;
Begin
Read(a);
If (a mod 2=0) and (a mod 7=0) and ( a mod 5<>0) then
a:=a+6;
Write(a);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Аэлита987
21.10.2020 07:09
Информатика. Выбрать правильные ответы ...
annafilimonova1
21.10.2020 07:09
уровень оценивание проведите мини исследование оцените какая топология сетей дома в крупных супермаркетах и аэропорту...
Aryyke08
21.10.2020 07:10
Предложите какие нибудь аниме Смотреть нечего...
fietisov
21.10.2020 07:10
Вечно арифметика информатика восьмой класс 14 вариант...
radmila85
21.10.2020 07:10
6. Придумайте несколько вариантов описания одного и того же объекта для разных целей. Подготовьте сообщение.7. Назовите процессы или явления, которые невозможно или очень...
alexey2030
21.10.2020 07:10
Выпишите лишние 1) pascal2) клавиатурный тренажёр 3) консультант плюс 4) Internet Explorer...
inessa30
22.07.2019 18:20
Отгадай загадку! им могу я указать, им могу я открывать, по экрану ходит он, называется . ответ:...
arinapretty
07.02.2022 20:08
3 класс цифровая грамотность...
инна103
07.02.2022 20:10
Напишите , программу(желательно в Phyton) У исполнителя Калькулятор есть три команды, которым присвоены номера:1. прибавь 12. умножь на 23. умножь на 3Напишите программу,...
ilyagammershmi
07.02.2022 20:21
с программой в ПИТОНЕ (python) . Задание: Нужно составить программу , выводящую значение TRUE ,если указанное высказывание является истинным и FALSE- в противном случае.(использовать...
Популярные вопросы
Составить предложения со словами: юнкор,тэц,рф,нии,кб,тв,аэс,бти,сми...
1
1) изобразите точки p,s и n так, чтобы они лежали на одной прямой и...
2
Диалог с другом про интернет на казахском языке...
3
Небольшое сочинение на тему природные явления своими словами (то есть...
2
Морской котик относится к зоне арктических пустынь...
1
Выполните действие 1,98+3/5= 8/15-0,3= 0,5-4/25+3/20= !...
1
Кто выполнял это ,можете сказать,сколько градусов тут?...
1
Что можно написать на тему что можно делать ученикам,а что нельзя (в...
1
ответить на вопросы : 1. как защитить общество от преступлений против...
2
Напишите текст изложения лисица на охоте...
2
Begin
Read(a);
If (a mod 2=0) and (a mod 7=0) and ( a mod 5<>0) then
a:=a+6;
Write(a);
End.