Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Kristina052602
20.11.2021 18:00 •
Информатика
Pascal.abc пользователь вводит целое число. если оно четное, если больше 10 и меньше 20, то вывести изначальное число, умноженное на 2.
Ответ:
mon13
09.10.2020 22:36
var a: integer;
begin
read(a);
if (a mod 2 = 0) and (a > 10) and (a < 20) then writeln(a * 2);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
3339991
10.07.2020 10:40
Кто разбирается в информатике? ? , 8 класс 1.составить блок-схему и программу. в треугольнике авс известны сторон a, b, с. вычислить длину биссектрисы, проведенной...
123443123
25.07.2021 15:58
Склавиатуры вводят последовательность чисел до тех пор пока не будет введено число 3. требуется найти сумму введенных чисел.(паскаль) !...
lisa221513
25.07.2021 15:58
Что не относится к понятию файла: 1 в нем хранятся рисунки, тексты программ, тексты документов и т.д. 2 специальное место на диске, где хранятся сведения о файле:...
даниил853
25.07.2021 15:58
Дана строка, содержащая путь к имени файла, например c: \webserver\home\test\file.doc . выделите из этой строки имя файла без расширения....
Tazedinova
25.07.2021 15:58
Найдите значение функции у=56х2-32 на отрезке (1; 10) с шагом 1....
kmelnuk5
10.12.2021 22:07
По информатике числа 215 и 145 перевести в двоичную а 101112 и 101012 тоже в двоичную систему 34...
Nasty2Tyan3
22.03.2022 12:02
Сколько единиц в троичной записи значения выражения 3^300+9^200+27^100-2*3^150+13 ? ответ в должен быть целым числом. все символы вводите без пробелов....
Аида1611
22.06.2022 16:51
Мощность неизвестного алфавита 8 букв. определите информационный вес одной буквы этого алфавита и суммарный информационный объём сообщения, состоящего из 7 букв этого...
joker9494
15.10.2021 09:30
Сколько символов содержится в алфавите,если каждый символ этого алфавита весит 5 бит...
bossmakswell
06.08.2021 16:36
, обьясните в чём ошибка? Python PyCharm OpenCV(cv2) C:\Users\DX1\PycharmProjects\pythonProject\venv\Scripts\python.exe C:/Users/DX1/PycharmProjects/pythonProject/main.py...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a: integer;
begin
read(a);
if (a mod 2 = 0) and (a > 10) and (a < 20) then writeln(a * 2);
end.