tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Как составить блок-схему
Как составить блок-схему и программу, проверяющую, верно ли утверждение, что введенное вами целое число является четным.
gamer2222
1 01.06.2019 07:40
1
Ответы
dulat15
05.04.2020 08:26
Var x,y: integer;
begin write('Введите число: ');
readln(x);
y:=x mod 2;
if y=0 then writeln('Четное')
else writeln('Нечетное');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Alin4ikVP
24.10.2021 21:55
Доказать справедливость закона алгебры логики согласно варианту задания. Упростить логическое выражение и построить таблицу истинности согласно варианту задания. Построить...
roman5555554
24.10.2021 21:50
Задать массив вещественных чисел с датчика случайных чисел. Упорядочить массив по возрастанию. С клавиатуры ввести число и вставить его в массив, так, чтобы не нарушалась...
Princess1111Yulua
24.10.2021 21:49
Составьте логическую схему для заданного выражения в тетради....
AmitJK
24.10.2021 21:45
запишите в десятричной системе счисления, а затем переведите в 8-ричную: MCMXCV...
Victoriya1234567890
18.05.2020 09:18
1. Считать с клавиатуры строку и удалить из нее все пробелы. 2. Считать с клавиатуры строку, состоящую из латинских букв (буквы могут быть прописными или строчными) и подсчитать...
ponia
18.05.2020 09:18
Не могу написать псевдокод к данной задаче: const N = 10; m = 8; var a: array[1..N, 1..m] of integer; k, max: integer; i, j: integer; b: array[1..m] of integer; begin randomize;...
KOBPAHET
03.12.2019 20:10
Написать рабочую программу на паскале нахождение суммы бесконечно убывающего ряда. написать программу суммирования ряда, в таблице, при одном и том же значении аргумента и...
tsisarmaria
03.12.2019 20:14
Каким образом можно возобновить нумерацию страниц в open.office.writer? ...
arsenandreeev
15.09.2019 06:10
Представление информации на каком-либо языке или в образной форме...
kassssseta
15.09.2019 06:10
Написать процедуру с параметрами, обеспечивающую умножение матрицы на вектор...
Популярные вопросы
Скільки разів виконається цикл, якщо початкове значення Х=11? Repeat X...
1
1 самолёт летел 47 минут 8 секунд 2 самолёт летел 33 минуты 39 секунд....
2
Вывод: (что такое яйцо? Как части яйца связаны с его строением?)...
1
Тихонько в зади подошёл два раза всунул и пошёл что это такое?...
2
Папороті розмножуються вегетативно: а)виводковими бруньками; б)кореневищем;...
2
Ребята КАПЕЦ КАК НАДА Як пройшла еволюція Елізи(твір Пігмаліон) ; від квіткарки...
3
Рассмотри рисунок и выбери правильный вариант ответа.Какой размножения...
1
Задание: списать, выполнить полный синтаксический разбор всех предложений...
2
1.Группа элементов управления во вкладке ссылки в MS word которые позволяют...
1
Прямокутника дорівнює 80 см його ширина становить 80% довжини Знайти периметр...
3
begin write('Введите число: ');
readln(x);
y:=x mod 2;
if y=0 then writeln('Четное')
else writeln('Нечетное');
end.