Images VAR BEGIN

< Previous photo
Photo - 3
Next photo >
Var begin. INT var 1;. Что делает эта программа? Var a, s: integer; begin writeln (‘а=’);readln (a);s:=a*a;writeln (s); end.. If POS(WORDTOFIND, line) > 0 then.
INT var 1;. Что делает эта программа? Var a, s: integer; begin writeln (‘а=’);readln (a);s:=a*a;writeln (s); end.. If POS(WORDTOFIND, line) > 0 then.

See also