Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
janja - popravek
//fpc 2.6.2 program Polje;//naloga 9 KJE JE NAPAKA const n=5; var Polje1: array[1..n] of integer; Polje2: array[1..n] of integer; i: integer; begin for i:= 1 to n do begin //writeln('Vpiši ',i, ' . število: '); readln(Polje1[i]); end; for i:= 1 to n do begin if(Polje1[i] MOD 2 = 0) then begin Polje2[i]:=(Polje1) / 2; end else Polje2[i]:= round(sqrt(Polje1[i])); end; write('polje1: '); for i:= 1 to n do begin write(Polje1[i],' '); end; Writeln(); write('polje2: '); for i:= 1 to n do begin write(Polje2[i],' '); end; end. //Napišite program, ki bo preko tipkovnice prebral 5 celih števil in jih vpisal v polje1. //Tvorite polje2 celih števil na naslednji način: //- če je neki element polja POLJE1 sodo število, potem v polje2 vpišete polovico tega elementa polja POLJE1. //- če je neki element polja POLJE1 liho število, potem v POLJE2 vpišete zaokrožen kvadratni koren absolutne vrednosti tega elementa.
run
|
edit
|
history
|
help
0
Сумма пар чисел кратных и некратных 11 с дельтой неэффективная
Unicorn
Решето Эратосфена
Kutman
nomer1
Kacper
nomer5
пи методом монте карло на единичной окружности
P170808A
1