М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
baschckinaekat
baschckinaekat
03.09.2021 22:25 •  Информатика

Перевидите код с паскаля в пайтон const N=10;

var

a:Array[1..N] of integer;

i,k,sum,c,b:integer;

begin

Randomize;

k:=0;

sum:=0;

for i:=1 to N do begin

a[i]:=random(61);

if a[i]>30 then k:=k+1;

if a[i]<30 then sum:=sum+a[i];

write(a[i],' ');

end;

writeln;

writeln(k,' чисел превышает 30');

writeln('сумма чисел = ',sum);

writeln;writeln;

writeln('введите число a');

readln(c);

writeln('введите число b (b должно быть больше a)');

readln(b);

for i :=c to b do

write(i,' ');

readln;

end.

👇
Ответ:
kiryagartman
kiryagartman
03.09.2021

import random

N = 10

a = [0]*(N+1)

k=0

summ=0

i=1

while i<= N:

   a[i] = random.randint(0, 61)

   if a[i] > 30:

       k += 1

   else:

       summ += a[i]

   print(a[i], end = '  ')

   i += 1

print('\n\n%d чисел больше 30'%k)

print('Сумма чисел = %d\n\n'%summ)

c = int( input('Введите число a: '))

b = int( input('Введите число b: '))

for i in range(min(b,c), max(b,c)):

   print(i, end = ' ')


Перевидите код с паскаля в пайтон const N=10; var a:Array[1..N] of integer; i,k,sum,c,b:integer; beg
4,7(43 оценок)
Открыть все ответы
Ответ:
lidochka4
lidochka4
03.09.2021

# 1.

# Полагаю, что в техническом задании ошибка и считаю фразу "делятся на" фразой "целочисленно делятся на".

def IsDivisible(digit, n): return (digit % n == 0)

digits=range(20, 50 + 1)

required=[str(digit) for digit in digits if IsDivisible(digit, 2) and not IsDivisible(digit, 5)]

print("Result:\n", '\n'.join(required))

# 2.

# Боль от запятой. Голову изломал от этого дробного остатка...

digits=range(35, 87 + 1)

required=[str(digit) for digit in digits if digit % 7 == 1 or digit % 7 == 2 or digit % 7 == 5]

print("Result:\n", '\n'.join(required))

4,6(24 оценок)
Ответ:
Arthas1212523
Arthas1212523
03.09.2021

Интернет стал предметом первой необходимости. В немможно совершать покупки, общаться с друзьями, получатьобразование, работать. Возможности Интернета стали практически безграничными.

Говорят, без еды человек может прожить примерно 2 месяца (если будет пить), без воды человек погибает через 5-7 дней, а можно ли прожить без интернета??? Вы представляли когда-нибудь мир без Интернета?

Недавно, люди жили без великого творения - Интернет. Остается только удивляться: как? В последние годы, из информационного ресурса, Интернет превратился в незаменимую и очень важную часть нашей жизни. Работа, учёба, общение — всё связано с Всемирной Паутиной. Сеть перестала быть источником информации — теперь это поставщик услуг: увеселительных, образовательных.… Да любых. Чтобы скрасить одинокий вечер люди не идут в парк или кафе, они заходят в Интернет. Они ищут развлечений в электронной системе, а не среди живых людей.

4,4(24 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ