Есть ответ 👍

До ть Потрібно малюнками в Power Point або картинками описати вірус Троянський кінь (троян) ​

235
268
Посмотреть ответы 1

Ответы на вопрос:


Var   n: integer; begin   readln(n);   if (n mod 10 = 1)  and ((n mod 100) div 10< > 1)  then   writeln(n,' год')   else   if ((n mod 10 = 2) or (n mod 10 = 3) or (n mod 10 = 4)) and  ((n mod 100) div 10< > 1)  then     writeln(n,' года')   else     writeln(n,' лет'); end.

Популярно: Информатика