Что будет выведено на экран в результате работы следующе- го цикла? а) k = 1 for i in range(1, 6): print( i, end="" ) б) k = 1 for i in range(1, 6): print( i+k, end="" ) в) k = 1 for i in range(1, 6): print( k*k, end="" ) k += 2 г) k = 8 for i in range(5, 0, -1): print( i, end="" ) k -= 2 д) k = 8 for i in range(5, 0, -1): print( 2*i-k, end="" )

Объяснение:

a)  1 2 3 4 5

б) 2 3 4 5 6

в) 1 9 25 49 121

г)  5 4 3 2 1

д) 2 0 -2 -4 -6

Программа получает на вход натуральное число, затем подсчитывает сумму его цифр и определяет наименьшую из всех цифр, кроме первой.
В соответствии с условием задачи требуется найти наибольшее четырехзначное число, сумма цифр которого равна 29, а наибольшая из трех последних цифр не превышает 7.
Итак, одна из цифр числа известна - это 7. Тогда сумма остальных трех цифр равна 29-7=22, причем две из этих цифр не могут быть меньше 7. Полагаем, что они равны 7 с тем, чтобы получить наибольшую допустимую первую цифру. Получаем 22-7х2=8, т.е. число должно быть равно 8777.
ответ: 8777

Const n=10; 
var a:array[1..n] of integer;
i,s,min:integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
 begin
 a[i]:=random(21)-10;
 write(a[i]:4);
 end;
writeln;
s:=0; 
min:=a[1];
for i:=1 to n do
 begin
 if a[i]>0 then s:=s+a[i];
 if a[i]<min then min:=a[i];
 end;
writeln('s = ',s,'   min = ',min);
for i:=1 to n do
 if a[i]>0 then a[i]:=s
  else if a[i]<0 then a[i]:=a[i]-min;
writeln('Измененный массив:');
for i:=1 to n do  write(a[i]:4);
writeln;
end.

Пример:
Исходный массив:
   9  -3  -5   7   1   5  -6   9  -8   7
s = 38   min = -8
Измененный массив:
  38   5   3  38  38  38   2  38   0  38