Форум программистов, компьютерный форум, киберфорум
Java SE (J2SE)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39

Перевод код Pascal на Java

20.01.2018, 13:09. Показов 1330. Ответов 34
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте! Кто сможет переводить этот код на Pascal на Java прошу помочь. срочно благодарен.
Pascal

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var n,s,k:longint;
 begin
  assign(input, 'input.txt'); reset(input); 
  assign(output, 'output.txt'); rewrite(output);
  read(n);
  if n=1 then
   write (1)
 else
  begin
   s:=n+1;
   for k:=2 to n-1 do
    if n mod k=0 then s:=s+k;
   write (s);
  end;
end.
Добавлено через 1 час 41 минуту
СРОЧНО
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
20.01.2018, 13:09
Ответы с готовыми решениями:

Перевод код Pascal на Java
Срочно. var st:string; i:byte; function Raz(p:char;m:byte):char; var G,j:byte; begin if p in then G:=ord(p)-48 else...

Перевод код Pascal на Java
Помогите пожалуйста!!! var s:string; i:word; BEGIN writeln('введите строку: '); readln(s); for i:=1 to length(s) do ...

Перевод код Pascal на Java
Прошу помочь! var i,gl,sogl:integer; s:string; begin s:='assuy s s q a aa'; for i:=1 to length(s) do if (s='a') or...

34
Эксперт PythonЭксперт Java
19530 / 11067 / 2931
Регистрация: 21.10.2017
Сообщений: 23,294
20.01.2018, 14:35
Tequ, тебе именно из файла в файл нужно, или консоли достаточно?
0
15 / 15 / 1
Регистрация: 15.01.2018
Сообщений: 42
20.01.2018, 21:08

Не по теме:

срочно благодарен.
Чел перепутал запятые с точками, и вот что получилось. :facepalm:


Мне если честно с файлами лень делать немного...
Java
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
import java.util.*;
import java.io.*;
 
class Main
{
    public static void main (String[] args) throws java.lang.Exception
    {
        BufferedReader in = new BufferedReader(new FileReader("D:/input.txt"));
        Scanner scanner = new Scanner(in.readLine());
        FileWriter writer = new FileWriter("D:/output.txt", false);
        
        long n = scanner.nextLong();
        if (n == 1) {
            writer.write("1");
            return;
        }
        long s = n + 1;
        for (long k = 2; k<n-1; k++) {
            if (n % k == 0) s+=k;
            writer.write(String.valueOf("s"));
        }
        writer.flush();
    }
}
1
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 15:54  [ТС]
Можно без файлов?
0
Эксперт PythonЭксперт Java
19530 / 11067 / 2931
Регистрация: 21.10.2017
Сообщений: 23,294
22.01.2018, 18:33
Tequ,
Java
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
import java.util.Scanner;
 
public class Main {
 
    public static void main(String[] args) {
        Scanner scanner = new Scanner(System.in);
        long n = scanner.nextLong();
        long s = 0;
        if (n == 1) {
            System.out.println("1");
        } else {
            s = n + 1;
            for (long k = 2; k < n - 1; k++) {
                if (n % k == 0) s += k;
            }
        }
        System.out.println(String.valueOf(s));
    }
}
1
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 22:27  [ТС]
Это тоже решить!
Миниатюры
Перевод код Pascal на Java   Перевод код Pascal на Java   Перевод код Pascal на Java  

Перевод код Pascal на Java   Перевод код Pascal на Java  
0
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 22:28  [ТС]
это всё на Java без файлов
0
Эксперт PythonЭксперт Java
19530 / 11067 / 2931
Регистрация: 21.10.2017
Сообщений: 23,294
22.01.2018, 22:32
Tequ, ты бы хоть спасибо людям сказал, а то прям ЦУ выдаешь...
0
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 22:38  [ТС]
СПАСИБО БОЛЬШОЕ, БЕЗ ВАШЕЙ ПОМОЩИ Я БЫ НЕ СДАЛ ПРАКТИКУ, ОТ ВСЕЙ ДУШИ СПАСИБО
0
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 22:39  [ТС]
Не знаю, что туту ещё сказать
Миниатюры
Перевод код Pascal на Java   Перевод код Pascal на Java   Перевод код Pascal на Java  

Перевод код Pascal на Java   Перевод код Pascal на Java  
0
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 22:40  [ТС]
это последнее
Миниатюры
Перевод код Pascal на Java   Перевод код Pascal на Java   Перевод код Pascal на Java  

0
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 22:53  [ТС]
Прошу помощи, так как сам справиться не в силах!
0
Эксперт Java
3639 / 2971 / 918
Регистрация: 05.07.2013
Сообщений: 14,220
22.01.2018, 22:54
в армию иди
0
Эксперт PythonЭксперт Java
19530 / 11067 / 2931
Регистрация: 21.10.2017
Сообщений: 23,294
22.01.2018, 23:07
Tequ, я вот не пойму - куда тебе такая мелкооптовая партия задач?
1
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
22.01.2018, 23:21  [ТС]
Практика в техникуме, а наш преподаватель так "хорошо" преподает, что мы ничего не понимаем
0
Эксперт PythonЭксперт Java
19530 / 11067 / 2931
Регистрация: 21.10.2017
Сообщений: 23,294
22.01.2018, 23:27
Tequ, а что за предмет?
0
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
23.01.2018, 00:02  [ТС]
Разработка и внедрение, адаптация программного обеспечения
0
Эксперт функциональных языков программированияЭксперт Java
 Аватар для korvin_
4575 / 2774 / 491
Регистрация: 28.04.2012
Сообщений: 8,779
23.01.2018, 09:13
Цитата Сообщение от Tequ Посмотреть сообщение
Практика в техникуме, а наш преподаватель так "хорошо" преподает, что мы ничего не понимаем

Не по теме:

А может, это вы так «хорошо» учитесь, что ничего не понимаете? Или, скорее, ты. Что-то не вижу наплыва студентов твоего техникума.

0
0 / 0 / 0
Регистрация: 31.05.2017
Сообщений: 39
23.01.2018, 09:44  [ТС]
Протсто, я единственный, кто этим форумом пользуется

Добавлено через 21 секунду
У остальных и 2 задач не сделано
0
 Аватар для Aviz__
2741 / 2050 / 507
Регистрация: 17.02.2014
Сообщений: 9,470
23.01.2018, 10:42
Цитата Сообщение от Tequ Посмотреть сообщение
я единственный
но, видишь, люди больше не горят твои задачи решать, когда видят, что сам не пытаешься...
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
23.01.2018, 10:42
Помогаю со студенческими работами здесь

Перевод код Pascal на Java
Здравствуйте! Кто сможет переводить этот код на Pascal на Java прошу помочь. срочно благодарен. uses crt; var a:array of integer; ...

Перевод код Pascal на Java
Пожалуйста помогите завтра надо лаборы сдать! Var s,sl:string;i,r:byte; begin Writeln('Vvedite tekst'); readln(s); ...

Перевод кода с Pascal на Java - Java SE
var a:Int64; begin Reset(Input,'input.txt'); Rewrite(Output,'output.txt'); read(a); Write(a,9,9-a) end. Заранее...

Перевод с Pascal на Java
var t:char; i,j,k:integer; a:array of boolean; b:array of integer; chk:array of boolean; x,y,q,n,m:integer; procedure...

Перевод с Pascal на Java
Помогите пожалуйста перевести на Java, 2 программы. program Vector; Const Nmax=1000; Type TVector=array of real; Var ...


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

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
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 с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru