перевести код из паскаля в питон, и главное чтобы он работал (чтобы в массиве из 10 случайных чисел выводилось еще сумма этих цифр, пример - 151 = 7 и так со всеми числами)
const n=10;
var a: array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
begin
a[i]:=random(401)+100;
write(a[i],' ');
end;
writeln;
for i:=1 to n do
write((a[i] div 100) + (a[i] div 10 mod 10) + (a[i] mod 10),' ')
end.

147

233

Посмотреть ответы 2

Ответы на вопрос:

zyryanovairina

Информатика

4,8(46 оценок)

Что это вообще такое вообще

vladugan

Информатика

4,6(49 оценок)

Var x, otrc, poloz: integer; begin repeat write('введите число: '); readln(x); if x > 0 then inc(poloz); if x < 0 then inc(otrc); until x = 0; writeln('количество положительных чисел: ', poloz); writeln('количество отрицательных чисел: ', otrc); end.