Program n_1;
var x:integer;
begin
readln(x);
x:=(x mod 10) + ((x div 10) mod 10) + ((x div 100) mod 10);
writeln(x);
end.
F_s=60*40=2400
o_s=2400*6=14400
odin_simv=28800/14400=2 bayt
bit=2*8=16 bit
Result= 16 bit
Program dop14; var x:char;beginwriteln('vvedite imya');readln(x);writeln('privet, ',x,'!');end.