Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
countrestrikegl
21.12.2020 10:44 •
Информатика
Составьте на паскале программу, которая определит, является ли целое число n четным двузначным числом.
Показать ответ
Ответ:
Kate215649
07.10.2020 01:12
Program abc;
var n : integer;
begin
writeln('Введите целое число:');
readln(n);
if (n mod 2=0) and (n div 100=0) and (n div 10>0) then
writeln ('Это чётное двухзначное число') else
writeln ('Это число не является чётным двухзначным')
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
strelok11261
29.03.2021 23:28
Дни недели пронумерованы следующим образом: 0-воскресенье, 1-понедельник, 2-вторик и т.д. известно, что первое число месяца был понедельник. определите какой день был...
ВикторияНяшка123
29.03.2021 23:28
Вмассиве хранится информация о стоимости каждой из 50 книг. вывести на экран стоимости 10 самых дешевых книг....
ииоииири
15.02.2022 02:14
Создайте веб-страницу «моё хобби » и импортируйте собствен- ный CSS с определением стилей для заголовков и ссылок....
али426
07.02.2021 09:20
Вычислите сумму ряда n чисел На языке ПаскальS=2/3+3/4+4/5+5/6...
KristinaSchool
18.03.2023 01:59
1. Изменить код любой предыдущей задачи - вынести циклический код в пользовательскую функцию 2. Напишите функцию перевода десятичного числа в двоичное. Спросите у пользователя...
darinashagaeva
23.05.2023 18:43
На рисунке ниже Сова учит Кота считать и просит его озвучить результат выполнения программы. Какое число назовёт Кот? когда нажат флажок.задать счет значение 17.повторить...
Zelka20199
06.05.2020 14:31
Как рисовать в Python без специальных функций? На самом начальном уровне нарисуйте прямоугольник с звездочек (*)....
alenavasina20
22.04.2022 03:25
выполнить арифметические действия в 8ричной и 16ричной системе счисления...
alenxolod3364
03.02.2020 15:04
Решить примеры по инфе (с решением) (3072 кб + 3072 кб)/2048 байт ответ указать в килобайтах (7 байт + 3072 бит)+(2 байта + 2016 бит) ответ указать в байтах (9гб + 9216мб)/2гб...
kamola555
09.03.2023 16:12
Чему равно значение n , если значение выражения n - 1 равно : 76 , 915, 1919 , 2120 , 571919...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n : integer;
begin
writeln('Введите целое число:');
readln(n);
if (n mod 2=0) and (n div 100=0) and (n div 10>0) then
writeln ('Это чётное двухзначное число') else
writeln ('Это число не является чётным двухзначным')
end.