Сколько раз будет выполняться цикл i:=5;
y:=1;
While i>2 do
i:=i-1;
y:=y+i*i;

Olegbro364682    2   21.01.2021 22:16    4