kuz-vlad21
?>

Между населёнными пунктами A, B, C, D, E построены дороги, протяжённость которых (в километрах) приведена в таблице. Определите длину кратчайшего пути между пунктами B и E. Передвигаться можно только по дорогам, протяжённость которых указана в таблице.

Информатика

Ответы

Pirogovskii695
Програма - це певний набір інструкцій, який відображається у вигляді кодів, схем, цифр і т.д. Зв'язані терміни в тому, що алгоритм - послідовне виконання певних дій. Так само ж працює й програма. Послідовно виконує певні дії. Наприклад, потрібно створити програму (або вона вже є створена), в якій потрібно написати привітальне повідомлення й вивід цифр від 1-1000. За алгоритмом спочатку виведеться вітальне повідомлення, після чого масивом виведуться числа від 1-1000. (написати програму можна в багатьох мовах програмування, наприклад С++) 
svetsalikowa
Function IsPrime(n: integer): boolean;
  // Проверка, является ли число простым
var
  p: integer;
  found: boolean;
begin
  found := (n mod 2 = 0);
  p := 3;
  while (not found) and (sqr(p) <= n) do
  begin
    found := (n mod p = 0);
    p := p + 2
  end;
  IsPrime := (not found) or (p = 2)
end;

const
  n = 20;

var
  i, k: integer;
  a: array[1..n] of integer;

begin
  Write('Введите 20 целых чисел через пробел: ');
  for i := 1 to n do
  begin
    Read(a[i]);
  end;
  k := 0;
  for i := 1 to n do
    if IsPrime(a[i]) then k := k + 1;
  Writeln('Количество простых чисел- ', k)
end.

Тестовое решение:

Введите 20 целых чисел через пробел: 5 36 83 1673 339 73 34 14623 7 173 62 45 3463 326 28 934 345 24 4526 1143
Количество простых чисел- 6

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Между населёнными пунктами A, B, C, D, E построены дороги, протяжённость которых (в километрах) приведена в таблице. Определите длину кратчайшего пути между пунктами B и E. Передвигаться можно только по дорогам, протяжённость которых указана в таблице.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

PoleshchukTatyana
ekaterinaorl1998
Оксана
rusdtver
Герасимова107
Artur-62838
Yevgenevich1150
volodin-alexander
romka1210
uksusoval617
xarfagr
Litvin_Ivanov
ver2bit29
jablokov
ЕленаАлександровна381