1)
program Sanya2263;
var n: integer;
begin
Read(n);
if (n>=100)and(n<=999) then Write('правда')
else Write('ложь');
end.
2)
var a,b: integer;
Read(a,b);
if a>b then Write('правда')
Поделитесь своими знаниями, ответьте на вопрос:
1) Дано число. Правда ли что оно трëхзначное. 2) Даны два числа. Правда ли что первое число больше второго. быстрей
1)
program Sanya2263;
var n: integer;
begin
Read(n);
if (n>=100)and(n<=999) then Write('правда')
else Write('ложь');
end.
2)
program Sanya2263;
var a,b: integer;
begin
Read(a,b);
if a>b then Write('правда')
else Write('ложь');
end.