перевод из С в паскаль.

@KpoccoB0K · Регистрация: 08.02.2010

Author24 — интернет-сервис помощи студентам

есть код в с++, его надо в паскаль переделать, а мне паскаль как-то уж очень чужой... помогите, пожалуйста.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#include <iostream.h>
#include <conio.h>
int i,val,j;
int func(int, int)
{
    for (j=2; j<=i; j++)
        if (!(val%j)&&!(i%j))
 return 0;
 return 1;
} 
int main()
{
    cout<<"Input number: ";
    cin>>val;
    cout<<"Found: ";
    for (i=2; i<=val; i++)
        if (func (val, i)) cout<<i<<" "; 
   cout<<endl;
    getch();
}

@WolfCF · 04.06.2010, 09:40

KpoccoB0K, а задание какое?

кросспостинг запрещен!

@KpoccoB0K · 04.06.2010, 09:49 **[ТС]**

да про задание долго объяснять. мне просто перевод нужен.

насчёт кросспостинга уже понял, извиняюсь...

@WolfCF · 04.06.2010, 09:51

KpoccoB0K, ну тогда извините....без задания сложно переводить...
Вот к примеру: дать вам текст на японском, и сказать, "переведите без словаря".

@KpoccoB0K · 04.06.2010, 09:57 **[ТС]**

задание такого: считывается число val. найти в интервале от 1 до val все числа у которых с val максимальный общий делитель равен 1.

Новые блоги и статьи Все статьи Все блоги /
Исключения в Java: советы, примеры кода и многое другое Javaican 18.05.2025 Исключения — это объекты, созданные когда программа сталкивается с непредвиденной ситуацией: файл не найден, сетевое соединение разорвано, деление на ноль. . . Список можно продолжать до бесконечности. . . .	Как сделать SSO (Single Sign-On) в C# приложении stackOverflow 18.05.2025 SSO — это механизм, позволяющий пользователю пройти аутентификацию один раз и получить доступ к нескольким приложениям без повторного ввода учетных данных. Вы наверняка сталкивались с ним, когда. . .	Kubernetes с Apache Flink для обработки данных в реальном времени Mr. Docker 17.05.2025 Kubernetes — это целая философия управления распределёнными приложениями. В отличие от "примитивных" решений вроде Docker Swarm, K8s (как его ласково называют в тусовке DevOps-инженеров) предлагает. . .	Использование декораторов в Python py-thonny 17.05.2025 Если вы когда-нибудь задумывались о том, как красиво расширить функциональность кода без лишней возни и дублирования, декораторы в Python — та самая волшебная палочка, которую вы искали. По сути, это. . .	Реализация многопоточных сетевых серверов на Python py-thonny 16.05.2025 Когда сталкиваешься с необходимостью писать высоконагруженные сетевые сервисы, выбор технологии имеет критическое значение. Python, со своей элегантностью и высоким уровнем абстракции, может. . .
C# и IoT: разработка Edge приложений с .NET и Azure IoT UnmanagedCoder 16.05.2025 Мир меняется прямо на наших глазах, и интернет вещей (IoT) — один из главных катализаторов этих перемен. Если всего десять лет назад концепция "умных" устройств вызывала скептические улыбки, то. . .	Гибридные квантово-классические вычисления: Примеры оптимизации EggHead 16.05.2025 Гибридные квантово-классические вычисления — это настоящий прорыв в подходах к решению сложнейших вычислительных задач. Представьте себе союз двух разных миров: классические компьютеры, с их. . .	Использование вебсокетов в приложениях Java с Netty Javaican 16.05.2025 HTTP, краеугольный камень интернета, изначально был спроектирован для передачи гипертекста с минимальной интерактивностью. Его главный недостаток в контексте современных приложений — это. . .	Реализация операторов Kubernetes Mr. Docker 16.05.2025 Концепция операторов Kubernetes зародилась в недрах компании CoreOS (позже купленной Red Hat), когда команда инженеров искала способ автоматизировать управление распределёнными базами данных в. . .	Отражение в C# и динамическое управление типами stackOverflow 16.05.2025 Reflection API в . NET — это набор классов и интерфейсов в пространстве имён System. Reflection, который позволяет исследовать и манипулировать типами, методами, свойствами и другими элементами. . .

@WolfCF 3316 / 1378 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	04.06.2010, 09:40
	KpoccoB0K, а задание какое? кросспостинг запрещен! 1

@KpoccoB0K 1 / 1 / 0 Регистрация: 08.02.2010 Сообщений: 22
	04.06.2010, 09:49 [ТС]
	да про задание долго объяснять. мне просто перевод нужен. насчёт кросспостинга уже понял, извиняюсь... 0

@WolfCF 3316 / 1378 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	04.06.2010, 09:51
	KpoccoB0K, ну тогда извините....без задания сложно переводить... Вот к примеру: дать вам текст на японском, и сказать, "переведите без словаря". 1

@KpoccoB0K 1 / 1 / 0 Регистрация: 08.02.2010 Сообщений: 22
	04.06.2010, 09:57 [ТС]
	задание такого: считывается число val. найти в интервале от 1 до val все числа у которых с val максимальный общий делитель равен 1. 0

Опции темы