Mail.ruПочтаМой МирОдноклассникиВКонтактеИгрыЗнакомстваНовостиКалендарьОблакоЗаметкиВсе проекты

переведите с pascal на javа

Чупакабра Чупакабра Ученик (50), на голосовании 5 лет назад
for i := 1 to 9 do readln(w[i]);

for i := 11 to 19 do readln(w[i]);

for i := 1 to 9 do readln(w[10*i]);

for i := 2 to 9 do begin

for j := 1 to 9 do begin
Голосование за лучший ответ
impressive_i Мыслитель (5173) 5 лет назад
Ввод данных с клавиатуры для Java:

import java.util.Scanner;
public class Program {
public static void main(String[] args) {
Scanner in = new Scanner(System.in);
System.out.print("Input a number: ");
int num = in.nextInt();
System.out.printf("Your number: %d \n", num);
}
}

Циклы такие же как в Си-подобных языках:

for(int i = StartValue; i < EndValue; i++){ ...}

И да, данный код, приведенный тобой плохой, потому что непонятный. Плюс, некоторые циклы можно объединить, логику можно прописать внутри одного цикла с помощью continue, break, if-else - веток.
Чупакабра ЧупакабраУченик (50) 5 лет назад
вот полный код
program c4;
program c4;

var

w: array[1..99] of string;

N: integer;

s: integer;

line: string;

i, j: integer;

begin

{читаем обучающий блок}

for i := 1 to 9 do readln(w[i]);

for i := 11 to 19 do readln(w[i]);

for i := 1 to 9 do readln(w[10*i]);

{строим полный словарь}

for i := 2 to 9 do begin

for j := 1 to 9 do begin

w[10*i + j] := w[10*i]+ ' ' + w[j];

end;

end;

{читаем и обрабатываем основной набор данных}

readln(N);

s:= 0 ;

for i:=1 to N do begin

readln(line);

j:=1;

while (j<100) and (w[j]<>line) do j:=j+1;

if j<100 then s:=s+j; end;

writeln(s);

end.
impressive_i Мыслитель (5173) И? В чем проблема?
Похожие вопросы