Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
6
//fpc 3.0.0 program HelloWorld; const n=10; var i, kol:integer; mas:array[1..n] of integer; begin for i:=1 to n do mas[i]:=random(50)-100; kol:=0; for I:=1 to n do if mas[i] mod 2 = 1 then kol:= kol + 1; writeln('kol=',kol); end.
run
|
edit
|
history
|
help
0
BubbleSor (slimmer)
Pokazivac-dinamicka alokacija memorije
kepo
Задание 27 2018 г.
String compare
LewisCableCompanyPasprogramme
a 3 .a
03 ariketa
Main-main
Задачи на div и mod