Ответ:
1.
var a:array [1..20] of integer;
i,m:integer;
begin
for i:=1 to 20 do
begin
write('a[',i,'] = ');
readln(a[i]);
end;
writeln;
write('Массив ');
m:=a[1];
for i:=1 to 20 do
begin
write (a[i], ' ');
if a[i]<m then m:=a[i]
end;
writeln;
writeln ('Наименьший элемент ',m)
end.
2.
var a:array [1..10] of integer;
i,mi:integer;
begin
write('Массив ');
for i:=1 to 10 do
begin
a[i]:=random(46)-20;
write (a[i], ' ')
end;
writeln;
mi:=1;
for i:=2 to 10 do
if a[i]<a[mi] then mi:=i;
writeln ('Номер наименьшего элемента ',mi)
end.
Ответ: в) ввпвпнн, потому, что там надо идти вниз, а вниз ненадо
Я считаю что правильный ответ в).Правда...Возможно я ошибаюсь ,ведь я такой же человек как и вы.Я тоже могу ошибиться.Но на данный момент я считаю что правильный ответ в.правда...
int - целое число
float - вещественное число одинарной точности
double - вещественное число двойной точности
char - один символ
bool - логический
woid - тип без значения
555 - int
136.75 - float double
Катя - string (строка символов)
"false" - bool
Количество цветов n = 2^i = 2^6 = 64