Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Технологии > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 21.06.2018, 14:51   #1
Nadin1985
Новичок
 
Регистрация: 14.06.2013
Сообщений: 1
Репутация: 10
По умолчанию Ребята помогите перевести с Питона на Паскаль

Код:

import random
import time
import msvcrt
 
N = 10
r_array = [random.randint(1, 100) for _ in range(N)]
print(r_array)
 
while sum(r_array):
    r_num = random.randint(1, 100)
    print('рандомное число',r_num)
    if msvcrt.kbhit():
        print (' stop')
        break
    time.sleep(1)
    for i,x in enumerate(r_array):
        if r_num == x:
            print('меняем совпавшие',r_num, 'на 0') 
            print( 'был список ',r_array)
            r_array[i] = 0
            print('измененный список',r_array,'\n')
         
print(r_array)

_____
Код программы нужно выделять (форматировать) тегами [CODE] (читать FAQ)
Модератор

Последний раз редактировалось Serge_Bliznykov; 21.06.2018 в 14:55.
Nadin1985 вне форума   Ответить с цитированием
Старый 25.06.2018, 10:47   #2
D1973
Пользователь
 
Регистрация: 04.04.2018
Адрес: Сибирь
Сообщений: 20
Репутация: 62
По умолчанию

А может проще Вам задание свое озвучить?
D1973 вне форума   Ответить с цитированием
Ответ

Опции темы

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

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
люди кто сможет перевести код с питона на с++ bekabeka Помощь студентам 3 06.03.2017 19:52
Помогите перевести кусок кода с С на паскаль afen Помощь студентам 0 17.11.2014 10:29
Обработка одномерного массива на C# (Помогите перевести код с Паскаль на C#) Sirba Помощь студентам 2 03.10.2013 14:14
Как установить скрипт Питона Владислав Темный Windows 1 26.07.2013 09:50


19:36.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru