100 баллов! ИНФОРМАТИКА. Задание прикреплено ниже./ПАСкаль

Question

100 баллов! ИНФОРМАТИКА. Задание прикреплено ниже./ПАСкаль

---

Comments

А что нужно? Программа - какой язык?

---

паскаль

---

Могу только на Python, сорян.

---

Нужен ток паскаль(

Answer 1

Ответ:

PascalABC.NET 3.6.2

begin

 var m := ReadInteger();

 case m of  

   1: print('пики');

   2: print('трефы');

   3: print('бубны');

   4: print('черви');

   else print('Invalid Range');

 end;

end.

p.s насколько нужно не хотеть учить предмет, что даже настолько элементарное задание не смочь сделать самостоятельно?

Comments

Я паскаль не изучал никогда, в школе не обьясняли и считаю самым не нужным языком, я начинал с JS и LUA

---

Сомнительное конечно решение, начинать изучение программирования с динамически типизированного языка, который ещё и кучу приведений типов проводит неявно и не совсем логично (вспомнить тот же лулз [] == ![] -> True), но, в принципе, запретить вам никто не в силах