по моему все правильно , надеюсь ты все поймешь
using System;
using static System.Console;
namespace ConsoleApp7
{
class Program
{
static bool isprost(int n)
{
bool t = true;
for (int i = 2; i <= n / 2; i++)
if (n % i == 0)
return !t;
return t;
}
static void Main(string[] args)
{
Write("Введите кол-во чисел n=");
int x, n = int.Parse(ReadLine());
Write("случайные простые числа по данной формуле из [0;28]: ");
Random r=new Random();
for (int i=1;i<=n;)
{
x = r.Next(0, 28);
if (isprost(x))
{
Write((x*x*2+29).ToString() + " ");
i++;
}
}
ReadKey();
}
}
}
// PascalABC.NET 3.2, сборка 1431 от 28.04.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Количество строк в матрице:');
var m:=ReadInteger('Количество столбцов в матрице:');
Writeln('*** Исходная матрица [',n,',',m,'] ***');
var a:=ReadMatrInteger(n,m);
var z:=ReadInteger('Z=');
var s:=a.ElementsWithIndexes.Where(x->abs(x[2])<=z);
if s.Count>0 then begin
var t:=s.First;
Writeln('Строка ',t[0]+1,', столбец ',t[1]+1)
end
else
Writeln('Элемент не найден');
end.
Пример
Количество строк в матрице: 4
Количество столбцов в матрице: 5
*** Исходная матрица [4,5] ***
-33 -46 7 48 -44
-13 -3 -13 -10 48
-18 -25 -39 -23 -44
28 32 -1 39 3
Z= 5
Строка 2, столбец 2