Яку роль в таблицях відіграє ? будь -ласка питання 1 структурна роль 2 роль каталізатору прогресу 3 ми підраховуємо лише складні варіанти та використовуємо функції 3 но основі цифр та формул ми складаємо робочі таблиці

uses crt; var r: byte; beginreadln(к); write('мне ',к); if r in [5..20] then write(' лет') else  case к mod 10 of 1: write(' год'); 2..4: write(' года'); 5..9,0: write(' лет'); else

writeln('error'); end; end.

через case оч хорошо всё получается)

или вот так по подробнее:

  const st='мне'; var k: byte; beginrepeat write('введите k (от 1 до 99): '); readln(k); until k in [1..99]; case k of11..20: writeln(st,' ',k,' лет'); elsebegin case k mod 10 of 1: writeln(st,' ',k,' год'); 2..4: writeln(st,' ',k,' года'); 5..9,0: writeln(st,' ',k,' лет'); end; end; end; readlnend.

такие деформации, которые, во-первых, выражают несправедливость социального устройства, открывают простор для произвола одних субъектов в ущерб другим; во-вторых, ущемляют права и свободы граждан, а в-третьих, ведут к дегуманизации и ущербности социального статуса и менталитета части населения. кроме того, в нашей стране имеются и правовые рычаги защиты как государственных интересов, так и интересов каждого гражданина от киберпреступности. и это несмотря на то, что ни административное, ни уголовное законодательство не предусматривают ответственности за совершение именно киберпреступлений.это обусловлено тем, что хотя киберпреступления и совершаются с компьютеров, компьютерных систем и сетей и в виртуальной среде, тем не менее они выходят на уровень и причиняют материальный вред, а, значит, посягают на реальные правоотношения, затрагивают интересы конкретных людей, приносят негативные последствия. в связи с этим к данным преступлениям применимы и существующие нормы административного и уголовного законов, действующих на территории российской федерации.