<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3>
begin
var s := ReadString;
((s.Count(t -> t in ['a'..'z']) > 0 ? 1 : 0) + (s.Count(t -> t in ['A'..'Z']) > 0 ? 1 : 0) +
(s.Count(t -> t in ['0'..'9']) > 0 ? 1 : 0) + (s.Length >= 8 ? 1 : 0)).Println;
end.
Var n:longint;
c:real;
begin
write ('N = ');
readln(n);
if (n mod 2 = 0) and (n>0) then c:=n/4 else
if (n mod 2 = 0) and (n<0) then c:=n*5 else
if (n mod = 1) then c:=sqr(n);
write (c:0:2);
end.
Namespace Вывод {
class Program {
static void Main(string[] args)
{
int n = 10;
int[] Mass = new int[n];
Random R = new Random();
for (int i = 0; i < n; i++) {Mass[i] = R.Next(0, 30);} Console.Write("\n--------- Массив -------------\n");
for (int i = 0; i < n; i++)
{ Console.Write(Mass[i] + " "); }
Console.ReadKey();
}<span> }
Что может быть проще?</span>
В последнем выражении <span>(cos(sqrt(x+y))/sin(sqrt(x+y)) первая скобка</span> лишняя, должно быть <span>cos(sqrt(x+y)) / sin(sqrt(x+y))</span>
1. Купить путевку на море - собрать вещи - поехать на море - разместиться в отеле - купаться, загорать, отдыхать, развлекаться - собрать вещи - уехать домой
2. Приехать в зоопарк - купить билет - зайти в зоопарк - ходить по зоопарку и смотреть на животных - выйти из зоопарка - вернуться домой