Question

Сожмите массив выбросив каждый 3 его элемент.Выведите на экран исходный и измененный результат

Answer 1

//PascalABC.Net 3.2
begin
var a:=ReadArrInteger('Вводите массив: ', readinteger('Кол-во элементов: '));
a.Println;
for var i:=0 to length(a)-1 do if (i+1) mod 3<>0 then print(a[i]);
end.

Answer 2

И что?

Answer 3

У нас все "дебилы" уже давно на C# и C++ пересели

Answer 4

Не, это уже не просто дебилы, это уже быдлокодеры, следующая стадия шизофрении. Я про студентов.