tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Закончить программу
Закончить программу решения . определить, является ли целое число n четным двухзначным числом.
Arina12261
3 07.07.2019 22:40
0
Ответы
Милая8
31.07.2020 01:16
Pascal:
program NN;
Uses CRT;
Var N: Integer;
Begin
N:=22; {или другое}
If ((n > 9) and (n<100) and (n mod 2 = 0)) then
Write('n является двухзначным чётным числом!');
ReadLn;
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Tadashimi2016
20.05.2019 12:30
Var n,n1,n2,n3: integer; begin; readln (n); n1: =n mod 10; n: =n div 10; n2: =n mod 10; n3: =n div100 if (n1=n2) and (n2=n3) then writeln ( y ) else writeln ( n ); end. ошибка...
kholdingmedia
17.03.2019 15:19
Решить по информатике1)найти y равный x²-5x+3 ,где x целое число с тем же ещё два примера 2)y=z²+4d-23)y=a³+b²-d...
pactuwka2
17.03.2019 15:22
Определите значение переменной a . полное решение, ....
Настасья020704
17.03.2019 15:23
Напишите программу которая вводит арифметическое выражение без скобок и операции с деревом вынести в отдельный модуль...
adrian55RUS
28.04.2021 12:11
Запиши верный ответ.38 div 5...
MarioCascas
24.07.2019 19:20
Програмирование .паскаль.цикл корень3+корень6+корень9+ надо написать программу...
Vitoriofedorov
24.07.2019 19:20
6.пусть видеопамять компьютера имеет объем 512 кбайт.размер графической сетки- 640 x 480. сколько страниц экрана одновременно разместиться в видеопамяти при палитре из 16 цветов;...
оарташ
25.06.2019 04:10
Допишите программу дано целое число, не меньшее 2. выведите его наименьший натуральный делитель, отличный от 1. var i,n,s: integer; begin read(n); i: =2; while s 0 do begin s:...
anechkasun1
03.03.2020 19:16
С кем из историков согласен / не согласен, почему...
lobanovartem2
03.03.2020 19:16
Запишите три последовательных числа, меньше из которых равно: 4, -3, -1...
Популярные вопросы
Унаслідок якої події було закріплено на карті лінію південно західного фронту...
3
46. Два туриста вышли навстречу друг другу: первый – из Балыкчы в Кочкор со...
3
Тветив на вопросы. 1) По какой причине Дуня и блудный сын оставили отчий дом?...
2
1. укажите названия следующих элементов на рисунке (прямая, луч, отрезок)...
1
На контурную карту мира нанесите крупнейшие горные системы мира: Гималаи, Анды,...
3
Перевести число 113 из 10СС в 2СС, 6СС, 16СС Информатика 8 класс удачи)...
3
Даны точки М(3; -2), N(–3; 4) и K(-4; 6). Определите координаты точки D так,...
3
В районе каких водоемах количество выпадаемых осадков не превышает 100мм...
3
6 сынып 1тоқсан қазақ тілі бжб жиынтық...
2
Маса білка 100 000. Визначте довжину молекули білка та масу ідовжину молекули...
3
program NN;
Uses CRT;
Var N: Integer;
Begin
N:=22; {или другое}
If ((n > 9) and (n<100) and (n mod 2 = 0)) then
Write('n является двухзначным чётным числом!');
ReadLn;
End.