илья1862
23.06.2021 05:05

Переведите этот код на язык Python! uses crt;
var
a:array[1..10]of integer;
i,sum,num : integer;
BEGIN
Randomize;
write('Исходный массив :');
for i:= 1 to 10 do
begin
a[i]:= Random(10);
write(a[i]:3);
end;
for i:= 10 downto 1 do
if a[i]= 0
then begin
num:= i;
inc(sum);
end;
writeln;
if sum = 0
then writeln('нулевых элементов в массиве нет')
else begin
writeln('количество элементов равных нулю = ',sum);
write('номер первого из них в массиве = [',num,']');
end;
END.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ksushaksenia11
03.02.2021 00:13
#include <stdio.h>
#include <stdlib.h>

int main()
{
int n=10, k;
int a[n];
int max = 20, min = -20;
int sum=0;
printf("k (<=10) = "); scanf("%d",&k);

srand (time(NULL));
for (int i=0; i<n; i++) {
 a[i] = (float) rand() / RAND_MAX*(max-min)+min;
 printf ("%d ", a[i]);
}
printf("\n");
for (int i = 0; i<k; i++) sum+=a[i];
printf("sum (1..%d) = %d\n", k,sum);
for (int i=1; i<=n-k; i++) {
 sum = sum-a[i-1]+a[i+k-1];
 printf("sum (%d..%d) = %d\n", i+1, i+k, sum);
}
return 0;
}

Пример:
k (<=10) =  5-10 1 -11 -10 16 6 -1 -15 -19 9
sum (1..5) = -14
sum (2..6) = 2
sum (3..7) = 0
sum (4..8) = -4
sum (5..9) = -13
sum (6..10) = -20
0,0(0 оценок)
Ответ:
Ханоглан122
07.08.2022 00:36
// PascalABC.NET 3.3, сборка 1555 от 21.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(10,10,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var s:=a.ElementsWithIndexes;
  var SumDiag:=s.Where(x->x[1]=x[2]).Sum(x->x[0]);
  Writeln('Сумма элементов на главной диагонали ',SumDiag);
  Writeln('Искомое количество элементов ',s.Where(x->x[0]<SumDiag/15).Count)
end.

Пример
*** Исходная матрица ***
  35  15 -56 -90 -87 -60 -82  -4 -72   9
  -9 -48 -45 -62 -48  95  57 -26  12  68
  34  72  10  -6 -12  15 -68 -11 -92  70
 -68 -52 -12  36 -61 -53 -82  18 -93  34
  87  89 -39 -87  67 -45  95 -77 -10  56
 -48  99  62  44  16  62 -95  49  22  -3
 -92  28 -12 -42 -23 -57  63  18  98 -94
  77 -61 -33  77  80  45  12  -3  26 -67
  20 -91  99 -49  18 -68 -14  43 -79 -23
 -58 -31  96  10  26 -40   1 -97  35  25

Сумма элементов на главной диагонали 168
Искомое количество элементов 57
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота