Условие: Вывести ** экран число,если оно двузначное. program prim2 ; var x: integer ;...

Question

Условие: Вывести на экран число,если оно двузначное.
program prim2 ;
var x: integer ;
writeln :('введите число')..
readln (x) ;
if x>10 then writeln (' da ') else writeln (' net ') ;
end.
В Pascal ABC выдает ошибку "Program1.pas(5) : Встречено 'if', а ожидался идентификатор"

Comments

Не удивительно - посмотрите в третьей строке оператор Writeln - он же криво написан.

---

Там все в норме, ошибка именно в 5 строке "if"..

---

Возможно в программе у Вас правильно, но то что Вы привели тут - оно синтаксически неверно.

---

Спасибо что откликнулись, все решено

Answer 1

Var
  n: integer;

begin
  Write('Введите число: ');
  Readln(n);
  if (n >= 10) and (n < 100) then Writeln(n)
end.

Тестовое решение:

Введите число: 12
12
Введите число: 5
Введите число: 500

Как видно из теста, на вывод попадает только двухзначное число.

Comments

Спасибо

---

Спасибо выражаем кнопочкой, а меру этого "спасибо" - числом звездочек.

Answer 2

Исправил вроде. там еще надо добавить одно условие, а то у тебя и на трехзначные будет "da"

Comments

переписал, все таже ошибка..

---

Спасибо