mgrunova3966
?>

13. Ввести данные аи b можно с клавиатуры с команд:а) Readln (a, b);б) Read a, b;B) Readln (a, b);г) Read (a, b);​

Информатика

Ответы

radatailless

ответ: ответ а , Readln (a,b);

Объяснение:

iordanekaterina
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
Olgera1
Програма - це певний набір інструкцій, який відображається у вигляді кодів, схем, цифр і т.д. Зв'язані терміни в тому, що алгоритм - послідовне виконання певних дій. Так само ж працює й програма. Послідовно виконує певні дії. Наприклад, потрібно створити програму (або вона вже є створена), в якій потрібно написати привітальне повідомлення й вивід цифр від 1-1000. За алгоритмом спочатку виведеться вітальне повідомлення, після чого масивом виведуться числа від 1-1000. (написати програму можна в багатьох мовах програмування, наприклад С++) 

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

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

13. Ввести данные аи b можно с клавиатуры с команд:а) Readln (a, b);б) Read a, b;B) Readln (a, b);г) Read (a, b);​
Ваше имя (никнейм)*
Email*
Комментарий*

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

masha812
Stasyadoma
Vik1744184
X2755070
EVLAMPIN56
serov555zaq5
Volkov
books
andrey
gabramova
shkola8gbr
oyunabaduraeva
ipKAV85
Yurevich-Vladimirovich
Reginahappy