Вопрос школьника по предмету Информатика
сформировать массив из чисел Фибоначчи небольших заданного натурального N,вывести на экран значение электронного массива являющимся простыми числами
Ответ учителя по предмету Информатика
Program DZ;
var n,i,k,j,f:longint;
a:array [1..10000] of longint;
begin
k:=0;
read (n);
a[1]:=1;
a[2]:=1;
for i:=3 to 10000 do
begin
if not(a[i-1] < n) then
begin
break
end;
a[i]:=a[i-1]+a[i-2];
k:=k+1
end;
for i:= 1 to k do
begin
f:=0;
for j:=2 to a[i]-1 do
if a[i] mod j=0 then f:=1;
if f=0 then write (a[i],’ ‘);
end;
end.
Это для Pascal
Похожие вопросы от пользователей
Встану Умоюсь. Оденусь. Позавтракаю . Позанимаюсь. ОТДОХНУ. Созвонимся. Договоримся. Встретимся. Погуляем. Поиграем. Вернусь. Пообедаю. Почитаю.ПОСПЛЮ.
О каком времени глагола пойдёт речь? Изменяются ли глаголы этого времени по числам? Подтверди примерами из текста.В каком лица стоят все глаголы? Будут ли они изменяются по лицам? Воспользуйся таблицей личных местоимений и покажи,как изменяются глаголы буд. вр. во 2-м и 3-м лице ед.ч и мн .ч. Используй для этого глаголы, выделенные в тексте. Сделай эту работу письменно.