Напишите программу определяющую принадлежит ли в веденное число игровому кубику ** языке...

Question

Напишите программу определяющую принадлежит ли в веденное число игровому кубику на языке паскаль помогите срочно надо

Answer 1

Считаем, что кубик имеет 6 граней, тогда число должно быть >=1 и <=6<br>
//PascalABC.NET (версия 3.1, сборка 1196 от 09.03.2016)
begin
  var x:=ReadInteger();
  if (x >=1) and (x<=6) then println('Принадлежит')<br>  else println('Не принадлежит');
end.