Images VAR BEGIN READLN

< Previous photo
Photo - 43
Next photo >
Var begin readln. 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.