Они отлечаются тем что переменой длины она работает по переменам а постояный он будет работать постояно
элементарно Вадсон
Var
n, s: integer;
begin
readln(n);
s := n mod 10 + n div 10000;
writeln(s);
end.
Количество информации на 1 точку = log(2)16777216 = 24 бит = 3 байта
Для всего изображения:
1024*768*3 байт = 768*3 Кбайт = 768*3/1024 Мбайт = 2,25 Мбай
// сойдет?
uses graphAbc;
const
d = 40;
w = d*12;
h = d*8;
x0 = d div 2;
y0 = d div 2;
begin
setwindowsize(w,h);
arc(x0+2*d,h-y0,2*d,180,90);
line(x0+2*d,h-y0-2*d,x0+10*d,h-y0-2*d);
rectangle(x0+10*d,h-y0-2*d,x0+11*d,h-y0-2*d-d div 4);
rectangle(x0+3*d,h-y0-2*d,x0+5*d,h-y0-3*d div 2);
rectangle(x0+7*d,h-y0-2*d,x0+9*d,h-y0-3*d div 2);
arc(x0+6*d,h-y0-2*d,4*d,180,0);
circle(x0+8*d,h-y0-4*d,d div 2);
end.
Переменная а, в, с, х:целый;
Начало
ввод(а);
с:=0;
для в:=1 до а делать
Начало
ввод(х);
если х>0 тогда начало
с:=с+х;
конец;
вывод("Количество слагаемых: ", в, " Сумма: ", с);
конец.