Using System;
namespace znanya
{
class Program
{
static void Main(string[] args)
{
Random rnd = new Random();
int kol = 0;
int[] arr = new int[10];
for(int i=0;i<10;i++)
{
arr[i] = rnd.Next(-1000, 1000);
if (arr[i] % 5 == 0)
kol++;
Console.Write(arr[i] + " ");
}
Console.WriteLine();
Console.WriteLine("{0} чисел кратно 5", kol);
Console.ReadKey();
}
}
}
<span>d)if (x>y) and (y>z) then a:=x+y+z</span>
2048*1536*32=100663296 бит
100663296/8 бит/1024 байт = 12288 Кбайт/1024 Кбайт = 12 Мбайт
#Python 3.X
n = int(input('n = '))
c2, c3 = 0, 0
for i in range(n):
x = int(input('Число {}: '.format(i + 1)))
if x % 2 == 0:
c2 += 1
elif x % 3 == 0:
c3 += 1
print('На 2 делится {} чисел, на 3 - {}.'.format(c2, c3))
uses crt;
type matr=array[1..20,1..20] of integer;
proc=procedure(m:matr;n:byte);