Images VAR A B C D INTEGER BEGIN

< Previous image
Image - 16
Next image >
Var a b c d integer begin. 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.
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.

See also