пмоготи решить по информатике на паскале.
в кругу стоят n-ое количество , которые считаются считалочкой. каждый 3 человек выбывает. кто отсался.
пример
водиться:
11
1 2 3 4 5 6 7 8 9 10 11
выводиться:
7

что неправильно в коде?
var
a,b,c,x,y,k,n,i,j: integer;
m: array[1..1000] of integer;
begin
readln(n);
for i: =1 to n do
m[i]: =i;
for i: =1 to n do
write(m[i],' ');
writeln;
i: =1;
c: =0;
while i< =n do
begin
c: =c+1;
if c=3 then begin
for j: =i to n do
m[j]: =m[j+1];
c: =0;
n: =n-1;
if (i=n) and (n> 1) then
i: =1;
end
else
if (i=n) and (i> 1) then
i: =1
else
i: =i+1;
end;
writeln(m[1]);
end.

171

461

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

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

orudcovamilana

Информатика

4,6(70 оценок)

ответ:переустанови виндовс это тебе только Объяснение:

Задай свой вопрос

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.