Images VAR A B C D INTEGER BEGIN

< Previous image
Image - 14
Next image >
Var a b c d integer begin. Var s, k: integer; begin readln s readln k if s div 2 k then writeln да else writeln нет end.. Var i,a,b: integer; begin Max:=0.
Var s, k: integer; begin readln s readln k if s div 2 k then writeln да else writeln нет end.. Var i,a,b: integer; begin Max:=0.