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();
}
}
}
//Программа на языке паскаль:
program zagadka;
var s: String;
begin
writeln('Сидит девица в темнице, а коса на улице.');
readln(s);
while(s <> 'Морковь')
do begin
writeln('Не угадал. Попробуй еще раз');
readln(s);
end;
writeln('Правильно. Угадал!');
end.
/*
Описание:
Выводим пользователю загадку и просим его ввести ответ. Пока пользователь не угадает, просим его снова и снова вводить ответ, предварительно написав, что он ошибся. Как только мы получаем правильный ответ, программа выводит пояснение пользователю, где пишет, что тот угадал. Программа заканчивает свою работу.