Если число, введенное с клавиатуры четырехзначное и делится на 5, то вывести слово "УДАЧА", в противном случае "НЕУДАЧА"

1

Ответы и объяснения

2014-03-01T07:06:23+00:00
Var a: Int64;
begin
  readln(a);
  writeln(((a >= 1000) and (a <= 9999) and (a mod 5 = 0)) ? 'Удача' : 'Неудача');
end.