Пусть Х - стоит собака, то корова - 4Х, а значит лошадь 4(4Х)=16Х.
Имеем:
Х + 4Х + 16Х = 210р
21Х=210р
Х=10р
Ответ:
Собака стоит 10р; корова 4*10=40р; лошадь 16*10=160р
Program n1;
var a,b,i: integer;
sum,k: real;
begin
sum:=0;
k:=0;
readln(a,b);
for i:=a to b do
begin
sum:=sum+i*i;
k:=k+1;
end;
writeln(sum/k:6:2);
end.
Program pas;
var
a:array[1..30] of integer;
i, k: integer;
s: real;
begin
s:=0;
k:=0;
for i:=1 to 30 do
readln(a[i]);
for i:=1 to 30 do
begin
if (not(a[i]mod 2=0)) then
s:=s+a[i];
inc(k);
end;
s:=s/k;
write(s:4:0);
end.
Объем видеопамяти =
5*12*256*512 бит = 5*12*256*512 / 8 байт = 5*12*256*512 / (8*1024) Кбайт = 960 Кбайт