Дан массив ненулевых целых чивел размера N. проверить, образуют ли его элементы геометрическую прогресию.если образуют , то вывести знаменатель прогресии, если нет- вывести 0.
Язык Python NList = [1,2,3,4,5,......,118] q = float(NList[1])/float(NList[0]) for i in range(len(NList)-1): if q == float(NList[i+1])/float(NList[1]): continue else: q = 0 break print q
нужно в паскале
помоги в паскаль певести я ваще в этом не шарю