0 / 0 / 0
Регистрация: 27.04.2021
Сообщений: 26

Перевод с паскаля на питон

27.04.2021, 21:29. Показов 5439. Ответов 7

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
program massive1;
const n=10;
var a:array [1..n] of integer;
    i:integer;
    k:integer;
Begin
    write('Введите верхнюю границу диапазона значения:');
    readln(k);
    randomize;
    for i:=1 to n do 
    begin
        a[i]:=random(k);
    end;
end.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
27.04.2021, 21:29
Ответы с готовыми решениями:

Перевод паскаля на питон
uses crt; const nmax=15; var a:array of integer; m,n,i,j,k,x:integer; begin clrscr; randomize; repeat write('Количество...

Перевод из Паскаля в Питон
var i, n, k, k1, kdel: LongInt; begin write ('n, k (через пробел) = '); readln (n, k); k1:=0; kdel:=-1; for i:=1 to n do ...

Перевод с паскаля на питон
Помогите код сделать на пайтон из паскаля uses crt; type Func=function(x:real):real; {$F+} function f1(x:real):real; begin ...

7
Эксперт Python
1356 / 653 / 207
Регистрация: 23.03.2014
Сообщений: 3,057
27.04.2021, 21:52
Так?
Python
1
2
3
4
5
6
7
8
9
10
11
import random
 
 
def masgen(n):
    mlist = (random.randint(1, 10) for i in range(n))
    print(*mlist)
 
 
if __name__ == '__main__':
    n = int(input())
    masgen(n)
0
5523 / 2876 / 572
Регистрация: 07.11.2019
Сообщений: 4,771
27.04.2021, 22:04
Цитата Сообщение от Dax Посмотреть сообщение
Так?
нет
k где вводится?
0
Эксперт Python
1356 / 653 / 207
Регистрация: 23.03.2014
Сообщений: 3,057
27.04.2021, 22:07
u235, решено так,потому, что, по сути, нужно получить n случайных чисел(если я правильно понял исходный алгоритм), то есть к это и граница диапазона и количество(на pascalбвидимо по привычке , использоваться еще и n чтоб смотреть пример на 10 числах, то есть, значимый параметр 1 и потому, в моем коде он и приведен 1).
0
5523 / 2876 / 572
Регистрация: 07.11.2019
Сообщений: 4,771
27.04.2021, 22:12
Dax, n=10 чисел в диапазоне от нуля до k, а у вас 9 чисел, в диапазоне от 1 до 10. Есть разница?
0
Эксперт Python
1356 / 653 / 207
Регистрация: 23.03.2014
Сообщений: 3,057
27.04.2021, 22:28
u235, Принципиальная, ваша правда.

Добавлено через 2 минуты
Python
1
2
3
4
5
6
7
8
9
10
11
12
import random
 
 
def masgen(n, k):
    mlist = (random.randint(0, k) for i in range(n))
    print(*mlist)
 
 
if __name__ == '__main__':
    k = int(input())
    n = int(input())
    masgen(n, k)
0
5523 / 2876 / 572
Регистрация: 07.11.2019
Сообщений: 4,771
27.04.2021, 22:38
Python
1
2
3
4
5
from random import randint, seed
seed()
n=10
k=int(input('Введите верхнюю границу диапазона значения:'))
a=[randint(0,k-1) for i in range(n)]
Можно было бы еще вывод добавить, но в исходной программе его нет.

Добавлено через 2 минуты
Dax, в паскале random(k) верхняя граница не включается.
1
Эксперт Python
1356 / 653 / 207
Регистрация: 23.03.2014
Сообщений: 3,057
27.04.2021, 22:41
u235, спасибо,учту.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
27.04.2021, 22:41
Помогаю со студенческими работами здесь

Перевод из паскаля в питон
var x,y:real; begin Write('Введите через пробел координаты точки (x,y): '); Read(x,y); Writeln((y<=x+3) and...

Перевод из паскаля в питон
var n: integer; count: integer; procedure R(n1: integer; start: integer; p: string); var j: integer; s: string; ...

Перевод из паскаля в питон
var arr: array of integer; i, n: integer; bool: boolean; begin bool:=false; readln(n); for i:=1 to n do ...

Перевод с Паскаля на Питон
program gg; var s: string; i, j, n:integer; was: boolean; begin readln(s); n:=0; for i:=1 to length(s) do begin ...

Перевод с паскаля на питон
Помогите с переводом пожалуйста. uses crt; const mf=500; type vector=array of real; var {раздел описания переменных, которые...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

Новые блоги и статьи
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru