Индексы 0, 1, 2, 3, 4, 5...
Ответ: A
1) C. знак плюс. 2) В. Shortint. 3) D. string. 4) судя по предложенным вариантам - C. 4, есть такой, но real, например, 8 байт. 5) А. 3,5 нельзя через запятую. 6) C. Var. 7) C. Var a,b: integer; c: real. 8) D. A:=164. 9) C. B:=6.06. 10) A. C:='Informatika'. 11) D. D:='C'.
Примерно так:
min=a[0];
for (int i=0, i<4, i++)
if(a[i]<min)
min=a[i];
здесь ты в переменную min записываешь минимальное значение. лучше первое значение из массива присваивать(или нулевое, как у меня).
проходишь циклом по массиву и сравниваешь значение min со значениями из масива. если какое-то окажется меньше, ты его записываешь в переменную min
если некоторые переменные окажутся одинаковыми, то ничего не произойдет :)
например
7 1 1 5
запишется первая единица. и все
Var a,b,c,d:integer;
beginwriteln('введите год');
readln(a);
if (a>=1730) and (a<=1914) then writeln('Санкт-Петербург');
if (a>=1915) and (a<=1924) then writeln('Петроград');
if (a>=1925) and (a<=1991) then writeln('Ленинград');
if (a>=1992) then writeln('<span>Санкт-Петербург</span>');
end.