Const N = 50;
var a: array[1..N] of integer;
sum, i: integer;
begin
sum := 0;
a[ 1 ] := 1;
for i := 2 to N do begin
a[ i ] := a[ i - 1 ] + 4;
sum := a[ i ] + sum;
end;
for i := 1 to N do
writeln('A[ ', i, ' ]: ', a[ i ]);
writeln;
writeln('Сумма элементов массива: ', sum);
writeln('Значения 10, 20, 30, 40 элементов, стоящих в нечетных позициях: ' );
writeln('A[ 13 ] = ', A[13],', A[ 25 ] = ', A[25], ', A[ 37 ] = ', A[37], ', A[ 49 ] = ', A[49]);
<span>end.</span>
2 - зрения. 90% информации мы получаем визуально, если не ошибаюсь)
Правильные: В) и (Б)
неправильные: (А)
правильно должно быть так:
(А) - PowerPaint*...и дальше предложение
Как то так, если не трудно поставь лайк, и в лучшее с:
Программа:
a = int(input("Введите 3-значное число:\n"))
a1 = a // 100
a2 = a // 10 % 10
a3 = a % 10
if a1>a2: a1,a2=a2,a1
if a2>a3: a2,a3=a3,a2
if a1>a2: a1,a2=a2,a1
b = a1*100+a2*10+a3
print (b)
Пример:
Введите 3-значное число:
951
159