Advertisement
Guest User

Untitled

a guest
Jul 4th, 2015
203
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.11 KB | None | 0 0
  1. Var k, b:integer; c:string;
  2. Begin K:=4; B:=5; C:='21'; If k>0 then write ('C=', C:1) else write ('C=', C:4); end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement