Условие: вывести на экран число,если оно двузначное. program prim2 ; var x: integer ; writeln : ('введите число' readln (x) ; if x> 10 then writeln (' da ') else writeln (' net ') ; end. в pascal abc выдает ошибку "program1.pas(5) : встречено 'if', а ожидался идентификатор"
n: integer;
begin
Write('Введите число: ');
Readln(n);
if (n >= 10) and (n < 100) then Writeln(n)
end.
Тестовое решение:
Введите число: 12
12
Введите число: 5
Введите число: 500
Как видно из теста, на вывод попадает только двухзначное число.