Задание 1
INPUT "n=", n
s = 0
FOR i = 1 TO n
s = s + i ^ 2
NEXT i
PRINT 4 * s
Задание 2
10 минут - это 1/6 часа и суммировать дроби, в знаменателе которых число 6, означает накапливать погрешности представления нецелых чисел в ЭВМ. Поэтому расчеты лучше делать в минутах, а результат потом перевести в часы.
Получаем сумму S=60М+(60М+10)+(60М+20)+...+[60М+10*(N-1)]
INPUT "M,N=", m, n
PRINT 5 * n * (12 * m + n - 1) / 60
Вот такие получаются короткие программы, если сначала думать, а потом писать.
<h3>3. а) 10011₂ = 1 * 2⁴ + 0 * 2³ + 0 * 2² + 1 * 2¹ + 1 * 2⁰ = 16 + 0 + 0 + 2 + 1=19</h3><h3>б) 254₈ = 2*8²+5*8¹+4*8⁰=128+40+4=172</h3><h3>4. а)18₁₀</h3><h3>б)4896₁₀</h3><h3>5. Только 2 ответ верный.</h3>
Program n1;
var a,sum,i: integer;
begin
sum:=0;
for i:=1 to 10 do
begin
readln(a);
if a mod 10=3 then sum:=sum+a;
end;
write(sum);
end.
N=
N - палитра (количество цветов)
i - кол-во бит на пиксель. По задаче - 3 бита.
N=
N=8