Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Huong11a2@
program bt1; Uses crt; Var i,S: integer; begin Clrscr; S:=0; For i:= 1 to 9 do if i mod 2<>0 then S:=S+i; Write ('gia tri cua S la ',S); Readln; end.
run
|
edit
|
history
|
help
0
Tableau
abcd...
Tri1
solar_system_array_n_planets
Genetic Pascal
Tangga angka
Пиріжки
1
practica 7 ejercicio 1
Promo1