Images BEGIN VARS

< Previous image
Image - 11
Next image >
Begin vars. Var begin. Что делает эта программа? Var a, s: integer; begin writeln (‘а=’);readln (a);s:=a*a;writeln (s); end.. If POS(WORDTOFIND, line) > 0 then.
Var begin. Что делает эта программа? Var a, s: integer; begin writeln (‘а=’);readln (a);s:=a*a;writeln (s); end.. If POS(WORDTOFIND, line) > 0 then.

See also