Паскаль! дано одно целое число. определить: а) является ли оно четным. б) делится ли оно на 13
tete12
3
21.05.2019 00:40
0
Другие вопросы по теме Информатика
diman772
11.07.2019 17:20
Lngtnk5
11.07.2019 17:20
Kostya2347
15.09.2019 19:05
nusbek
15.09.2021 22:31
teunov
15.09.2021 22:27
Rifik
04.12.2020 11:21
FCMM
04.12.2020 11:21
dasa2208
01.07.2019 00:10
Зачемжежить
23.06.2019 16:30
manokhaangel
20.11.2019 19:10
Популярные вопросы
- Как Зная одно из решений простейшего тригонометрического уравнения...
3 - 5,4×6555555×777777×333333×222222,3×××0...
3 - Hi Anna, I want to tell you about my best friend. Her 1)is s11 years...
1 - 2) (-56-1c-3)-33) (-k-5)-9 =4) (0,2t n-7)-6...
1 - Технология Номер крючка соответствует 1. длине рукоятки (в сантиметрах)...
3 - Напишите вместо А такое натуральное число, чтобы получилось верное...
2 - A(2;8;-3),B(-5;2;-5),C(1;-2;1) A)Найдите координаты вершины D параллелограмма...
3 - Домашнее задание: . Решить задачи: 1)Вычислите объем водорода массой...
2 - Вопросы по праву, нужно ответить...
1 - Що, на ваш погляд, непокоїть розум автора твору «Всякому городу...
1
var
a:integer;
begin
readln (a);
if a mod 2 =0
then writeln ('Четное')
else writeln ('Нечетное');
if a mod 13=0
then writeln ('делится на 13')
else writeln ('не делится на 13')
end.