с информатикой Какое значение получит переменная a после выполнения серии команд a:=5; b:=2; a:=b * a - SQR(a) ; 1) -15 2) 15 3) 40 4) 10 2. Что будет выведено на экран после выполнения серии команд a:=5; b:=2; a:=b-a mod 4; write(`a=`, a); 1) 2 2) a=2 3) a=1 4) a=0 3.Что будет выведено на экран после выполнения серии команд a:=4; b:=2; a:=b-a div 3; write(a); 1) 12 2) 5 3) 1.7 4) 1 4. Что будет выведено на экран после выполнения серии команд a:=4; b:=8; a:=a / b - 5; write(abs(a)); 1) 4.75 2) 4.5 3) 5.25 4) -4.5 5. Переменная а является целой. В какой строке при использовании команды присвоить значение допущена ошибка ? 1) a:=SQRT(a); 2) a:=sqr(5); 3) a:=a / 5-1; 4) a:=abs(2*a); 6. Чему равно значение выражения: sqrt(16)*2 – sqr(3) – 20/5 1) 5 2) -6 3) –5 4) 6 7. Запишите значение переменной s, полученное в результате работы следующей программы. Var s, k: integer; Begin s := 0; for k := 3 to 7 do s := s + 6; writeln(s); End. 1) 24 2) 30 3) 36 4) 16

Пусть исходное число будет abc, где a - первая цифра, b - вторая, c - третья.

b,c - цифры => они принимают целые значения от 0 до 9. Так как число трехзначное, то a не может быть равно 0 => a принимает целые значения от 1 до 9.

Произведение двух цифр не превосходит 9*9=81.

Ищем произведения цифр в числе 123:

1 и 23 - неверно(1=1*1, но 23=1*c=> c=23>9)

12 и 3 - верно(1*3 и 3*4,  записаны в порядке убывания)

Нам нужно найти наименьшее число, значит значения a и b как первых цифр числа должны быть минимальны.

По условию:

a*b=3

b*c=12

Подбираем значения a,b и c:

a=1; b=3; c=12/3=4 - верно, число 134

a=3; b=1; c=12/1=12 - неверно

В итоге, получили, что число 134 - минимальное.

ответ: 134

6)
const n=10;
var a: array[1..n] of integer;
i,max,min : integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
a[i]:=random(21);
write(a[i]:3);
end;
writeln;
max:=a[1]; min:=a[1];
for i:=2 to n do
begin
if a[i] > max then max:=a[i];
if a[i] < min then min:=a[i];
end;
writeln('L = ',max-min);
end.

Пример:
Исходный массив:
10 8 8 6 4 16 18 10 11 13
L = 14

9)
const n=10;
var a: array[1..n] of real; 
  i,k1,k2 : integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
 a[i]:=10*random-5;
 write(a[i]:5:2);
 end;
writeln;
k1:=0; k2:=0;
for i:=1 to n do
 if a[i]>0 then k1:=k1+1
  else if a[i]<0 then k2:=k2+1;
writeln('Положительных: ',k1,', отрицательных: ',k2,' нулевых: ',n-k1-k2);
end.

Пример:
Исходный массив:
-1.03 2.79-3.60 0.33-3.69-4.69-2.34-4.19 1.20 1.74
Положительных: 4, отрицательных: 6 нулевых: 0

16)
const n=10;
var a: array[1..n] of real; 
  i : integer;
begin
for i:=1 to n div 2 do begin
 a[i]:=i;
 a[n div 2+i]:=sin(a[i]);
 end;
for i:=1 to n div 2 do
  writeln(a[i]:4:1,a[n div 2+i]:6:2);
end.

Пример:
1.0 0.84
2.0 0.91
3.0 0.14
4.0 -0.76
5.0 -0.96

19)
const n=10;
var a: array[1..n] of integer; 
  i: integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
 a[i]:=random(51);
 write(a[i]:5);
 end;
writeln;
writeln('Выбранные элементы:');
i:=1;
while i<=n do
 begin
 write(a[i],' ');
 i:=2*i;
 end;
end.

Пример:
Исходный массив:
8 38 22 45 36 23 21 13 5 13
Выбранные элементы:
8 38 45 13