Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Task 3a
var count, x : integer; begin count := 0; x := 1; while count < 5 do begin if x mod 2 = 0 then begin writeln(x); inc(count, 1); // count := count + 1; end; inc(x, 1); // x := x + 1; end; end.
run
|
edit
|
history
|
help
0
la moyenne de théo
test08
6
Lab1SumWithRepeat
practica 5 ejercicio 2
codigo
1
Why do not work?
nomer1
Poukimone1 tg