Ответы на вопрос:
1
program xxx;
var n : integer;
begin
write('введите число n=');
readln(n);
if n mod 2 = 0 then write('четное') else write ('нечетное');
realdn
end.
2
program xxx;
var n : integer;
begin
write('введите число n=');
readln(n);
e : = n mod 10
if e = 7 then write('заканчивается на 7') else write ('не заканчивается на 7');
realdn
end.
Популярно: Информатика
-
1804lenalb10.11.2021 23:35
-
rusik6617.05.2021 16:25
-
Дарина3737303.07.2022 21:07
-
Филин462562223.06.2023 23:37
-
Георгий16124.07.2020 09:40
-
Алина1ззз17.09.2021 23:39
-
Belka121121.03.2021 03:21
-
olgaserzhantova11.04.2020 14:16
-
kreker12827.12.2021 14:52
-
nikabelousova1123.01.2020 15:57