Вывести в обратном порядке только простые элементы целочисленной последовательности

@alisa208 · Регистрация: 07.07.2014

Студворк — интернет-сервис помощи студентам

Дана целочисленная последовательность. Вывести в обратном порядке только простые ее элементы.

Просто́е число́ — это натуральное число, имеющее ровно два различных натуральных делителя: единицу и само себя. Все остальные числа, кроме единицы, называются составными. Таким образом, все натуральные числа больше единицы разбиваются на простые и составные. Изучением свойств простых чисел занимается теория чисел. В теории колец простым числам соответствуют неприводимые элементы.
Входные данные:

Во входном потоке в первой строке записано единственное натуральное число N - количество элементов числовой последовательности (N <= 1000);
Во второй строке, через пробел, перечислены N целых чисел, значения которых по модулю не превышают 32000.
Выходные данные:

В выходной поток вывести целые числа, перечисляя их через пробел.
Пример входного файла:

5
-7 12 3 28965 1

Пример выходного файла:

3

подскажите, что неправильно

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var x,a,i,n,k,j:longint;
begin 
read(n);
for i:=1 to n do begin  read(a);
end;
for i:=n downto 1 do begin
k:=0;
for j:=2 to trunc(sqrt(a)) do 
if a mod j=0 then inc(k);;
if (a<>1) and(k=0) then write(a,' ');
end;
end.

@Puporev · 03.05.2015, 14:04

Сообщение от Николайчик

Вот мой код.

Совсем плохой...

Сообщение от volvo

Вот я же тебя не просто так просил привести скриншот,

Новые блоги и статьи Все статьи Все блоги /
Установка нескольких штампов электронной подписи в строго определенных местах файла docx ВладимирСамохин 19.07.2026 (В!) Работа с Электронной подписью - это неотъемлемая часть современного документооборота. Но что делать, если нужно поставить несколько штампов электронной подписи в строго определенных местах. . .	сукцессия 35. Научная статья о проделанной работе anaschu 19.07.2026 Написал в формате латекс и пдф	Вангую, что это не пройдёт модерацию, и на неделе я запущу свой сервер. Hrethgir 19.07.2026 Эта публикация сейчас в песочнице и ждёт приглашения. https:/ / habr. com/ ru/ sandbox/ 295048/ начало и оглавление - Как «пернатого» заставить осваивать новые горизонты опыта через масштабирование. . .	сукцессия 33. открытые вопросы от клауде anaschu 19.07.2026 "Что накопилось за эту часть А — тринадцать правок, из которых шесть пришли из ваших вопросов и каждая оказалась реальной ошибкой, а не калибровкой: односторонний симбиоз, отсутствующий листопад,. . .
32 сукцессия anaschu 19.07.2026 сукцессия 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не «подкручивает» сходимость —. . .	сукцессия 31: модель микоризы - это модель ещё нескольких явлений, социальных и экономических anaschu 18.07.2026 Теория «Всего»: апдейт v1. 1. 2 — 28‑мерное ядро стабилизировано Коллеги, фиксирую разбор инженерных правок и их изоморфную проекцию на экономику, меметику и половой отбор. Модель теперь не. . .	сукцессия 30. Массив проверяющих друг друга моделей anaschu 18.07.2026 Архитектура сети взаимопроверяющих моделей микоризной сукцессии (v2. 0) Развитие тензорного ОДУ-ядра и создание кросс-платформенного калибровочного полигона Уважаемые коллеги! В продолжение. . .	Грибы - это женщины, деревья - это мужчины. Анти инь янь для союза мужчины и женщины. anaschu 18.07.2026 ГЛАВНЫЙ НАУЧНО-ФИЛОСОФСКИЙ ВЫВОД: Сексуально-Репродуктивный Капитализм против Государства Моногамии Коллеги, мы вышли на финишную прямую 20-мерного ОДУ-моделирования вековой сукцессии (ветка. . .