Var a,V,S:integer;
Begin
writeln('Enter A:');
readln(a);
V:=a*3;
S:=6*2*a;
writeln('V=',V,'; S=',S,';');
end.
var a,b,sum,dob,raz:integer;
Begin
writeln('Enter A:');
readln(a);
writeln('Enter B:');
readln(b);
sum:=abs(a)+abs(b);
raz:=abs(a)-abs(b);
dob:=abs(a)*abs(b);
writeln('Summa=',sum,'; Raznost=',raz,'; Dobutok=',dob,';');
<span>end.</span>
<span>1 Битовая структура определяет первое свойство внутренней памяти компьютера — дискретность. Дискретные объекты составлены из отдельных частиц. Например, песок дискретен, так как состоит из песчинок. «Песчинками» компьютерной памяти являются биты.</span>
<span>2 СD, DVD, flash-накопители, дискеты, жесткий диск</span>
<span>3 СD, DVD, СD-R, DVD-R, СD-RW, DVD-RW, Blu-Ray, HD-DVD</span>
У тебя запятые в скобках немного не на местах стоят
program pr;var m:string;beginread(m);writeln('Мой повелитель', ' ', m);end.
Если введёшь с всё имя, то всё будет стоять на месте.
54 символа
1 символ=1байт=8 бит
54*8=432бит