Задана последовательность из N вещественных чисел. Вычислить сумму чисел, порядковые номера которых являются простыми числами.
171
404
Ответы на вопрос:
uses crt;
const n=5;
var a:array[1..n] of real;
i,j,k:integer;
sum:real;
begin
clrscr;
randomize;
writeln('Posledovatelnost:');
for i:=1 to n do
begin
a[i]:=10*random;
write(a[i]:4:1);
end;
writeln;
sum:=0;
for i:=2 to n do //начинаем с 2
begin
k:=0;
for j:=2 to round(sqrt(i)) do //смотрим каждое число до его корня, дальше нет смысла, делителей нет
if i mod j=0 then inc(k);//считаем делители
if k=0 then sum:=sum+a[i];//если делителей нет, считаем сумму
end;
write('Summa=',sum:0:1);
readln
end.
const n=5;
var a:array[1..n] of real;
i,j,k:integer;
sum:real;
begin
clrscr;
randomize;
writeln('Posledovatelnost:');
for i:=1 to n do
begin
a[i]:=10*random;
write(a[i]:4:1);
end;
writeln;
sum:=0;
for i:=2 to n do //начинаем с 2
begin
k:=0;
for j:=2 to round(sqrt(i)) do //смотрим каждое число до его корня, дальше нет смысла, делителей нет
if i mod j=0 then inc(k);//считаем делители
if k=0 then sum:=sum+a[i];//если делителей нет, считаем сумму
end;
write('Summa=',sum:0:1);
readln
end.
лплпдпдппддкадрдкдажплкддпбпкдаюиладпдрдкдпдрдпдпдрдещпдадрдпмщкщбкпщщпдадп
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Другие предметы
-
KarinaZinovets09.05.2022 06:34
-
АНДРЕЙ2285555529.03.2020 21:17
-
викуха30805.04.2023 16:15
-
flanchase28.03.2023 12:26
-
Юрий21040419.07.2020 18:10
-
Паша220421.12.2020 22:38
-
erushevsascha07.11.2022 07:59
-
logoschaolj09.10.2020 04:14
-
natalyasergeev120.04.2023 16:46
-
dzikita231.10.2020 13:38
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.