Михеев557
?>

пмоготи решить по информатике на паскале. в кругу стоят 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.

Информатика

Ответы

nataliaprintroll

конкретно в каких стейтментах была ошибка , я не смог разобраться , но фактически у тебя

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.

kategar

# 1

from builtins import print

a = int(input())

b = int(input())

c = int(input())

d = int(input())

if (a + b + c + d) == (a * b * c * d):

   print('Сумма и произведения равны')

else:

   if (a + b + c + d) < (a * b * c * d):

       print('Cумма меньше произведения')

   else:

       print('Сумма больше произведения')

#2

sum = 0

for i in range(4):

   a = int(input())

   if a > 0:

       sum+=a

print(sum)

# 3

sum = 0

for i in range(4):

   a = int(input())

   if a < 0:

       sum += a

print(sum)

# 4

minus = 0

plus = 0

null = 0

for i in range(4):

   a = int(input())

   if a < 0:

       minus += 1

   else:

       if a > 0:

           plus += 1

       else:

           null += 1

print('Положительных {}, отрицательных {}, нулей {}'.format(plus, minus, null))

# 5

a = int(input())

b = int(input())

polusum = (a * b) / 2

ydvoen = 2 * a * b

if a > b:

   a = polusum

   b = ydvoen

else:

   b = polusum

   a = ydvoen

print(a, b)

# 6

z = []

for i in range(3):

   z.append(input())

if z[0] == min(z):

   z[0] = 0

else:

   if z[1] == min(z):

       z[1] = 0

   else:

       z[2] = 0

print(z)

#7

z = []

for i in range(4):

   z.append(int(input()))

print(max(z)-min(z))

# 8

M = 0

kvartal = 0

M = int(input())

if (M > 1) and (M < 4):

   kvartal = 1

   print('Квартал - ', kvartal)

else:

   if (M > 3) and (M < 7):

       kvartal = 2

       print('Квартал - ', kvartal)

   else:

       if (M > 6) and (M < 10):

           kvartal = 3

           print('Квартал - ', kvartal)

       else:

           if (M > 9) and (M < 13):

               kvartal = 4

               print('Квартал - ', kvartal)

if kvartal == 0:

   print('Введён неккоректный месяц')

# 9

list = ['крыса', 'корова', 'тигр', 'заяц', 'дракон', 'змея', 'лошадь', 'овца', 'обезьяна', 'петух', 'собака', 'свинья']

god = int(input())

opred = (god - 1995) % 12 - 1

print(list[opred])

Advantage9111

Посилальна цілісність (англ. referential integrity) — один з різновидів обмеження узгодженості[en] бази даних, який полягає у відсутності в будь-якому з її відношень посилань на дані, що відсутні в іншому відношенні[1].

Приклад бази даних у якої немає посилальної цілісності. В цьому прикладі існує значення зовнішнього ключа (artist_id) у таблиці альбомів, яке посилається на відсутнього артиста. Тобто, наявне значення зовнішнього ключа, яке не має відповідного первинного ключа у відповідній таблиці. Так сталось, тому, що артист Aerosmith зі значенням artist_id рівним 4, чомусь був видалений з таблиці артистів. Проте, альбом Eat the Rich[en] посилається на цього виконавця. З посилальною цілісністю це було б неможливо.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

пмоготи решить по информатике на паскале. в кругу стоят 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.
Ваше имя (никнейм)*
Email*
Комментарий*