конкретно в каких стейтментах была ошибка , я не смог разобраться , но фактически у тебя
1.был не правильный вывод (m[1])
2.неправильная итерация по циклу с переменной 'с'
крч легче было просто переделать
var
c, n, i, j: integer;
m: array[1..1000] of integer;
begin
Readln(n);
for i := 1 to n do
begin
m[i] := i;
Write(m[i], ' ');
end;
writeln;
while n >= 1 do
begin
if c+2 < n then c := c + 3 else c := n - c + 3;
for i:=c to n do m[c]:=m[c+1];
n := n - 1;
end;
writeln(m[c]);
end.
Язык Java
import java.util.*;
import java.io.*;
public class Main {
static int _16yearsOld = 0;
static int min = 14;
static int max = 16;
static int diff = max - min;
static Random random = new Random();
static int rand = random.nextInt(diff + 1);
rand += min;
public static void main(string[] args) {
int[] students = new int[19];
for (int i = 0; i <= students.size(); i++) {
students[i] = rand;
}
for (int i = 0; i <= students.size(); i++) {
if (students[i] == 16)
_16yearsOld++;
}
}
}