Program1.pas(13) : Нельзя преобразовать тип real к integer. Что не так ? program arif;
var a,b,c:integer;
d:real;
begin
writeln('Введи 2 числа');
readln(a,b);
c:=a+b;
writeln(a,'+',b,'=',c);
c:=a-b;
writeln(a,'-',b,'=',c);
c:=a*b;
writeln(a,'*',b,'=',c);
c:=a/b;
writeln(a,':',b,'=',с);
c:=a div b;
write(a,':',b,'=',c);
c:=a mod b;
writeln('и',c,'в остатке');
end.

Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text.RegularExpressions;

namespace Dcoder
{
public class Program
{
public static void Main(string[] args)
{
Console.Write("Размер массива: ");
int n = Convert.ToInt32(Console.ReadLine());
int[] arr = new int[n];
Random rand = new Random();
for (int i = 0; i < arr.Length; i++)
arr[i] = rand.Next(1, 100);
for (int i = 0; i < arr.Length; i++)
if (arr[i] % 2 == 0)
Console.WriteLine(arr[i]);

Console.WriteLine();

for (int i = 0; i < arr.Length; i++)
if (arr[i] % 2 != 0)
Console.WriteLine(arr[i]);
Console.ReadLine();
}
}
}

Файлы:
1. primera.dat
2. primera.doc
3. merchant.doc
4. k-mer.doc
5. omerta.doc
6. Temerlan.docx

1) *mer?.doc - отбирает файлы с расширением .doc и именем (я буду называть именем всё без расширения), оканчивающимся на mer и еще какую-то букву.
Будет отобрано только файл 2.
2) ?*mer?.doc - тут по сравнению с предыдущим добавляется условие, что перед mer должно быть что-то еще. Если в случае был 1 файл, то и в этом не больше одного.
3) *mer*?.doc - файлы с именем, содержащим mer, но не оканчивающимся на него и расширением .doc. Отберутся файлы 2, 3, 5 - три файла.
4) *?mer*?.doc - тут mer должно еще и не быть в начале, по сравнению с предыдущим. Будут отобраны файлы 2 и 5.

ответ. 3.