Св паскале! написать решение для программы паскаль. ) имеется массив а из n произвольных чисел (а( среди которых есть положительные, отрицательные и равные нулю. используя оператор цикла, составить программу, выполняющую : найти номера первых двух рядом стоящих одинаковых элементов в массиве. например, если а={2,6,4,4,2,5,5,4}, результат: 3 и 4.
109
327
Ответы на вопрос:
Program random_; uses crt; type arr = array[0..1000] of shortint; var ar,b,i: word; a: arr; begin randomize; for ar: =0 to 999 do a[ar]: = random(18)-9; b: =10; i: =0; repeat b: =a[i]; i: =i+1; until(b = a[i]) or (i = 999); if i = 999 then writeln('повторяющихся чисел нет! ') else writeln(i,' ',i+1) ; end.
Предположительно, этот феномен объясняется тем, что в принципе у человека имеется лишь такие способы получения информации, как зрение, слух, вкус и обоняние. и все эти виды ощущений постоянно "включены" в организме человека и не могут не быть использованы, т.е. их нельзя просто так выключить. таким образом, когда человек спит, он может учуять запах пирогов, и во сне, с большой вероятностью, может присниться пища, еда. и если же, этот момент подкреплён голодом, то естественно, эффект усиливается. и возможно, что человек и вовсе проснётся.
Популярно: Информатика
-
Emro15.10.2021 19:27
-
6aPaLlJek20.04.2023 19:05
-
резной77709.05.2021 02:53
-
Zulik00719.06.2020 12:43
-
AnitaGo28.12.2021 18:18
-
ogorodnikovkir27.12.2021 01:18
-
gordeeva200316.09.2021 11:08
-
aze123412.12.2021 22:14
-
anastaseyaaaa13.12.2020 16:20
-
ROMAGTTV90002.05.2021 16:16