Ввести n чисел и найти сумму простых чисел в паскале

// PascalABC.NET 3.2, сборка 1467 от 02.06.2017
// Внимание! Если программа не работает, обновите версию!

function IsPrime(n:integer):boolean;
begin
  if n<4 then Result:=True
  else begin
    var found:=(n mod 2=0);
    var p:=3;
    while (not found) and (sqr(p)<=n) do
      begin found:=(n mod p=0); p+=2 end;
    Result:=not found
    end
end;

begin
  Writeln('S=',ReadSeqInteger('Вводите:',ReadInteger('n='))
      .Where(m->IsPrime(m) and (m>0)).Sum)
end.

Пример
n= 6
Вводите: 20 17 31 15 19 7 9
S=74

Function P(A:integer):boolean;
Var d,K:integer;
Begin
P:=true;
if A < 2 then P:=false
else
   if A > 3 then
      if A mod 2 = 0 then P:=false
      else
         Begin
         K:=Trunc(Sqrt(A));
         d:=3;
         While d <= K do
            Begin
            if A mod d = 0 then P:=false;
            d:=d+2
            End;
         End;
End;
Var
   A,n:integer;
   S:real;
Begin
S:=0;
Write('n = ');ReadLn(n);
Write('Введите n чисел: ');
For n:= 1 to n do
    Begin
    Read(A);
    if P(A) then S:=S+A;
    End;
Write('S = ',S)
End.

Диагра́мма (греч. Διάγραμμα (diagramma) — изображение, рисунок, чертёж) — графическое представление данных, позволяющее быстро оценить соотношение нескольких величин. Представляет собой геометрическое символьное изображение информации с применением различных приёмов техники визуализации.

Основные типы диаграмм:

1.1 Диаграммы-линии (графики)

1.2 Диаграммы-области

1.3 Столбчатые и линейные диаграммы (гистограммы)

1.4 Круговые (секторные) диаграммы

1.5 Радиальные (сетчатые) диаграммы

1.6 Картодиаграммы

1.7 Биржевые диаграммы

2 Пространственные (трёхмерные) диаграммы

3 Ботанические диаграммы

4 Анимированные диаграммы

Диаграммы-линии или графики — это тип диаграмм, на которых полученные данные изображаются в виде точек, соединённых линиями. Точки могут быть как видимыми, так и невидимыми (ломаные линии). Также могут изображаться точки без линий (точечные диаграммы). Для построения диаграмм-линий применяют прямоугольную систему координат. Обычно по оси абсцисс откладывается время (годы, месяцы и т. д.), а по оси ординат — размеры изображаемых явлений или процессов. На осях наносят масштабы[4].

Диаграммы-линии целесообразно применять тогда, когда число размеров (уровней) в ряду велико. Кроме того, такие диаграммы удобно использовать, если требуется изобразить характер или общую тенденцию развития явления или явлений. Линии удобны и при изображении нескольких динамических рядов для их сравнения, когда требуется сравнение темпов роста. На одной диаграмме такого типа не рекомендуется помещать более трёх-четырёх кривых. Их большое количество может усложнить чертёж, и линейная диаграмма может потерять наглядность[6].

Основной недостаток диаграмм-линий — равномерная шкала, позволяющая измерить и сравнить только абсолютные приросты или уменьшения показателей в течение периода исследований. Относительные изменения показателей искажаются при изображении их с равномерной вертикальной шкалой. Также в такой диаграмме может быть невозможным изображение рядов динамики с резкими скачками уровней, которые требуют уменьшения масштаба диаграммы, и показатели в ней динамики более «спокойного» объекта теряют свою точность. Вероятность присутствия в этих типах диаграмм резких изменений показателей возрастает с увеличением длительности периода времён на графике

Объяснение:

Цикл - это повторение одного или нескольких действий до достижения определенного результата.

Цикл с параметром - это когда перед выполнением этих действий заранее известно, сколько раз они повторятся (эта циферка и есть параметр) .

Цикл с условием - это когда количество повторов зависит от того, выполняется или не выполняется какое-либо условие.

Цикл с предусловием - это когда сначала проверяешь, выполняется ли это самое условие, а потом, в зависимости от результата проверки, выполняешь или не выполняешь действие еще раз.