231 вот вроде послеыждцбадв
Var a,sum,i,ii:integer;
begin
sum:=0;
readln(a);
for i:=1 to 4 do
begin
ii:=a mod 10;
a:=a div 10;
sum:=sum+ii*ii;
end;
writeln(sum);
end.
Фотосъемка достопримечательностей относится к получению (сбору) информации.
Ниже можно не записывать, записал для понятности.
(Т.к матрица на фотоаппарате собирает пучки света на себя отправляя в процессор, процессор перерабатывает изображение в изображение .jpg)
ответ не правильный, там должно быть 8 пункты ABDCE 2+1+3+2=8