Числа вводятся с клавиатуры? Или просто вывести сумму ? В паскале не очень, я больше в с++; напишу логику, под синтаксис подгонишь.
Если просто 2+3, тогда:
a=3;
b=2;
c=a+b;
" тут надо вывести на экран с "
800*600=480 000 число пикселей
480000*4=1 920 000 число пикселей на четырех страницах... .
глубина цвета 24...
24 это - 16 777 216 цветов (или 1 пиксель использует 3 байта)
1920000*3 = 5 760 000 байт = 46 080 000 бит = 5625 КБ = 5.5 МБ
Var n,a,m,s,q:integer;
begin
read(n,a);
q:=1;
while n>0 do begin
s:=n mod 10;
if s<>a then begin
m:=m+s*q;
q:=q*10;
end;
n:=n div 10;
end;
writeln(m);
end.
I:integer;
s:string;
for i:=1 to length(s) do
begin
if s[i]='*' then s[i]:='_';
end;
вроде всё, программу сам оформляй