Написать программу, которая печатает значение логического выражения (TRUE или FALSE)в...

Question

Написать программу, которая печатает значение логического выражения (TRUE или FALSE)в Паскале:Первая и последняя цифры трехзначного числа равны.

Answer 1

Var a: integer;
begin
  readln(a);
  writeln(a mod 10 = a div 100);
end.

Comments

Вводится трехзначное число, нажимается ENTER, программа пишет true или false.

---

пардон, не туда(

Answer 2

Var
a: integer;
begin
readln(a);
if a mod 10 = a div 100 then
writeln('TRUE')
else
writeln('FALSE');
end.

Comments

хотя не знаю будет ли работать в ABC

---

сделайте проще, поставьте readln; перед end.

---

Работает и в ABC, и в ABC.NET

---

все

---

да все работает, я имел в виду сочетание клавишь alt+F5 (показать экран вывода)

---

; пропустил:D

---

readln помог?

---

не пробовал.просто сам все распечатал.а до этого тупо скопировал

---

А скопированный код не работает разве?

---

не знаю.но верно не верно не показывало