М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
зулик3
зулик3
01.06.2023 02:32 •  Информатика

Дана последовательность n целых чисел.посчитать количество простых чисел в этой последовательности. код: паскаль тема: массивы

👇
Ответ:
Sanisle
Sanisle
01.06.2023
Цикл в цикле ваша тема: 

program pin; 

var 
i, j, cm: Integer; 
povtor: Boolean; 

const 
m: array[1..10] of Integer = (1, 2, 3, 1, 2, 5, 4, 3, 1, 2); 

begin 
cm := 0; 

for i := 1 to 10 do 
begin 
povtor := False; 
for j := 1 to 10 do 
begin 
if (i <> j) and (m[ i ] = m[ j ]) then 
begin 
povtor := True; 
Break; 
end; 
end; 

if not povtor then cm := cm + 1; 

end; 

WriteLn(cm); 

end.
4,6(7 оценок)
Открыть все ответы
Ответ:
ArtGame23
ArtGame23
01.06.2023

написал на с++

Объяснение:

#include <iostream>

#include <windows.h>//для русской раскладки

using namespace std;

int main()

{

SetConsoleCP(1251);//подключаем русскую раскладку

SetConsoleOutputCP(1251);

float a[3][4]; //двумерный массив

cout << "Введите элементы массива:" << endl;

for (int i = 0; i < 3; i++)

{

 for (int j = 0; j < 4; j++)

 {

  cout << "a[" << i + 1 << "][" << j + 1 << "]= ";

  cin >> a[i][j];

 }

}

cout << "Введенная матрица до изменения:" << endl; //вывод матрицы B

for (int i = 0; i < 3; i++)

{

 for (int j = 0; j < 4; j++)

 {

  cout.width(7);// выравниваем числа по7 позиций

  cout << a[i][j];

 }

 cout << endl;

}

for (int i = 0; i < 3; i++)

{

 for (int j = 0; j < 4; j++)

 {

  if (a[i][j] == 0)

   a[i][j] = 10;

 }

}

cout << "Введенная матрица после изменения:" << endl; //вывод матрицы B

for (int i = 0; i < 3; i++)

{

 for (int j = 0; j < 4; j++)

 {

  cout.width(7);// выравниваем числа по7 позиций

  cout << a[i][j];

 }

 cout << endl;

}

system("pause");

return 0;

}

4,6(85 оценок)
Ответ:
rafik14
rafik14
01.06.2023

Написал на С++

Объяснение:

#include <iostream>

#include <windows.h>//для русской раскладки

using namespace std;

int main()

{

SetConsoleCP(1251);//подключаем русскую раскладку

SetConsoleOutputCP(1251);

int a[15]; //массив  

cout << "Введите элементы массива:" << endl;

for (int i = 0; i < 15; i++)

{

 cout << "a[" << i+1 << "] = ";

 cin >> a[i];

}

int max = a[0]; //максимальный элемент массива

for (int i = 0; i < 15; i++)

{

 if (a[i] > max)

  max = a[i];

}

cout << "Максимальный элемент массива равен: " << max << endl;

system("pause");

return 0;

}

4,5(21 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ