СРОЧНО...ПОМОГИТЕ ПОЖАЛУЙСТА8 КЛАСС ПАСКАЛЬ 1 ЗАДАЧА (отдам все баллы которые остались)

Question

СРОЧНО...ПОМОГИТЕ ПОЖАЛУЙСТА
8 КЛАСС ПАСКАЛЬ
1 ЗАДАЧА (отдам все баллы которые остались)

---

Answer 1

Li07 Главный мозгЗадача 1program xxx;   var n : integer;begin   write('введите число n=');   readln(n);   if n mod 2 = 0 then write('четное') else write ('нечетное');   realdnend.

Comments


Задача 1
program xxx;
var n : integer;
begin
write('введите число n=');
readln(n);
if n mod 2 = 0 then write('четное') else write ('нечетное');
realdn
end.

---

NA

---

спасибо огромное

---

не за что

---

❤.