Форум программистов, компьютерный форум, киберфорум
Python для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 29.06.2018
Сообщений: 48

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

13.12.2020, 13:03. Показов 1610. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите перевести код с Паскаля на Питон
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var
  a, b, x, y, z: real;
 
begin
  Write('X = '); Readln(x);
  Write('Y = '); Readln(y);
  Write('Z = '); Readln(z);
  a := (3 + Exp(y - 1)) / (1 + Sqr(x) * Abs(y - Sin(z) / Cos(z)));
  b := 1 + Abs(y - x) + (Sqr(y - x) / 2) + (Exp(3 * Ln(Abs(y - x))) / 3);
  Writeln('A = ', a:0:2);
  Writeln('B = ', b:0:2);
  Readln
end.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
13.12.2020, 13:03
Ответы с готовыми решениями:

Перевести из паскаля в питон
uses crt; type Date=record Day:Integer; Month:Integer; Year:Integer; end; mas=array of string; var d1,d2:Date; ...

Перевести с паскаля на питон
Буду ооочень благодарна. Вот код проги: var a,i:integer; f,f1:text; begin assign(f,'input.txt'); reset(f); ...

Перевести с Паскаля на Питон
var gr,mr,gs,ms,vozrast:integer; begin writeln('vvedite god i mesyac rojdeniya'); readln(gr,mr); writeln('vvedite segodnyashniy...

6
23 / 22 / 4
Регистрация: 25.06.2018
Сообщений: 169
13.12.2020, 13:37
Берете только то, что между begin и end.

Write('X = '); Readln(x); на Питоне так: x = input('X = ')

В формулах, вместо := просто =
И функции надо с библиотеки math брать.
1
0 / 0 / 0
Регистрация: 29.06.2018
Сообщений: 48
13.12.2020, 18:51  [ТС]
Спасибо, поправил чутка но все одно при запуске не чего не происходит(((
Вот пример моего кода уже с поправками
Python
1
2
3
4
5
6
7
8
9
10
11
12
import math
 
 
def exp1( x, y, z):
    x = input(x,'X = ')
    y = input(y,'y = ')
    z = input(z,'Z = ')
    a = math.sqrt = (math.sqrt(abs(x - 1)) - (abs(y) ** (1/3))) / (1 + ((x**2) / 2) + ((y**2) / 4))
    b = math.sqrt = x * (math.atan(z) + math.e ** (-(x+3)))
 
    print(a,b)
    return a, b
0
Эксперт Python
5438 / 3859 / 1215
Регистрация: 28.10.2013
Сообщений: 9,552
Записей в блоге: 1
13.12.2020, 18:54
Цитата Сообщение от Chaky1 Посмотреть сообщение
но все одно при запуске не чего не происходит(((
А должно, если ты функцию не вызвал?
И не надо пихать input'ы в функцию.
Функция должна принимать аргументы. А ты туда что передавать будешь?
1
0 / 0 / 0
Регистрация: 29.06.2018
Сообщений: 48
13.12.2020, 20:13  [ТС]
Не могли бы поправить как должно быть?) плззз))
0
312 / 192 / 98
Регистрация: 01.05.2014
Сообщений: 522
14.12.2020, 11:16
Лучший ответ Сообщение было отмечено Chaky1 как решение

Решение

Chaky1,
Python
1
2
3
4
5
6
7
8
9
10
import math
 
 
x = int(input("X = "))
y = int(input("Y = "))
z = int(input("Z = "))
a = (3 + math.exp(y - 1)) / (1 + math.sqrt(x) * abs(y - math.sin(z) / math.cos(z)))
b = 1 + abs(y - x) + (math.sqrt(y - x) / 2) + (math.exp(3 * math.log(abs(y - x))) / 3)
print("A = %.2f" % (a))
print("B = %.2f" % (b))
В вашем коде 5-7 строки вынести из функции, 11 удалить, и вызывать
Python
1
print(exp1( x, y, z))
1
0 / 0 / 0
Регистрация: 29.06.2018
Сообщений: 48
14.12.2020, 15:02  [ТС]
Спасибо большое)))+1=)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
14.12.2020, 15:02
Помогаю со студенческими работами здесь

Перевести с паскаля на питон
var R,M0,M1,res,i,N,dat: longint; begin M0 := 0; M1 := 0; readln(N); for i := 1 to N do begin readln(dat); if (dat mod 2...

Перевести с паскаля на питон
var a, s: integer; begin s:= 0; readln(a); while a<>0 do begin if (a mod 6 = 0) and (a mod 10 = 4) then s := s + a; ...

Перевести с Паскаля на Питон
Знающие люди, помогите, заранее спасибо за любую помощь ) function A(n: integer; x: real): real; begin if n = 1 then A := x ...

Перевести из паскаля в питон
program Mustafander; uses crt; var i,n,m:integer; begin Write('Enter N = ');readln(n); Write('Enter M = ');readln(m); ...

Перевести с паскаля на питон
var N: longint; a: array of longint; s_old, s_new: array of longint; i, j, k, r: longint; begin ...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Конвертировать закладки radiotray-ng в m3u-плейлист
damix 19.02.2026
Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru