Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
123
Program n_3; const n=20; var I, s: integer; a: array [ 1 . . n] of integer; begin randomize; for I := 1 to n do begin a [ I ] := random( 100 ) + 50; writeln ( ‘ a [‘, I, ‘]=’ , a [ I ] ) end; a := 0 for I :=1 to n do s := s +a [ I ]; writeln (‘ s=’, s) end.
run
|
edit
|
history
|
help
0
sorting_direct_choise_optimized
Сумма пар чисел кратных и некратных 11 с дельтой
Obrni listu
P170808A
Ipis unazad ulancana lista
Bilangan fibonacci ke-1 sampai ke-n
pretvarac u sekunde
test01
practica 1 ejercicio 7
nomer1