Question

Решите плиз не могу придумать, как решить В Москве установили счетчики системы СтатГрад для учета и контроля над силой града. Каждый счетчик системы учитывает количество попаданий в него градин за сутки. Если в него попадает меньше a градин, то он передает сигнал NO GRAD. Если попадает не меньше a градин, но меньше b градин, то он передает сигнал GRAD. Если больше либо равно b градин – то он ломается, и не передает никакого сигнала. Даны числа a и b (a < b), а также количество попавших в счетчик градин. Требуется определить, какой сигнал нужно передать. Входные данные Вводятся три натуральных числа, не превосходящих 1000: a, b и количество градин. Числа разделены пробелом. Выходные данные Выведите либо NO GRAD, либо GRAD, либо не выводите ничего. Примеры входные данные 10 20 15 выходные данные GRAD входные данные 10 20 5 выходные данные NO GRAD входные данные 10 20 30 выходные данные

Answer 1

// PascalABC.Net v.3.2, сборка 1325 (19.10.2016)
Var a,b,k:longint;
Begin
read(a,b,k);
if (k<a) then
begin
writeln('NO GRAD');
halt; // Можно заменить на exit;
end;
if (k>=a) and (k<b) then writeln('GRAD');
End.