Выбери верные варианты ответа Отметь все файлы, которые будут найдены по маске *а?.d* (в имени файла используются русские буквы, в расширении — английские). Шap. doc
Марс. doc
Караван. d
Оскар. mp3
А8.d

1, 3, 5

Объяснение:

+2): 3+4): 5+6): 7+8): 9=1

program zadacha;

uses crt;

var a: array[1..6] of integer;

        max,i: integer;

begin

for i: =1 to 6 do readln(a[i]);

max: =a[1];

for i: =1 to 6 do if max > a[i] then max: =a[i];

writeln(max);

readln;

end.

вроде правильно..