Дан целочисленный массив из 30 элементов, все элементы которого — положительные…

Question

59

Дан целочисленный массив из 30 элементов, все элементы которого — положительные числа, не превосходящие 100. Опишите в Паскале алгоритм, который находити выводит номер элемента, имеющего максимальное количество целочисленных делителей. Исходные данные объявлены так, как показано ниже. Разрешается не использовать часть описанных ниже переменных.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

qualqua · Accepted Answer

47

qualqua

27 августа 2022

const N=30; var a: array[1… N] of integer; i, j, k, imax, kmax: integer; beginkmax: =0; imax: =0; for i: =1 to N do readln (a[i]); k: =0; for j: =1 to a[i] div 2 do if a[i] mod j=0 then inc (k); if k>kmax then beginkmax: =k; imax: =i; end; end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: