Программа получает на вход N, почле чего в цикле постепенно обрабатывает все натуральные числа от 1 до N включительно и в ячейку памяти s откладывает их квадраты.
program summa;
uses crt;
var N,a,s,i: integer;
begin
read(N); a:=0; s:=0;
for i:=1 to N do
begin
a:=a+1;
s:=s+(a*a);
end;
writeln(s);
end.
Ответ:
1110101₂ = 117₁₀
213₈ = 139₁₀
4AF₁₆ = 1199₁₀
95₁₀ = 1011111₂
95₁₀ = 137₈
95₁₀ = 5F₁₆
Объяснение:
1110101₂ = 1*2⁰ + 0*2¹ + 1*2² + 0*2³ + 1*2⁴ + 1*2⁵ + 1*2⁶ = 117₁₀
213₈ = 3*8⁰ + 1*8¹ + 2*8² = 139₁₀
4AF₁₆ = 15*16⁰ + 10*16¹ + 4*16² = 1199₁₀
95₁₀ = 1*2⁰ + 1*2¹ + 1*2² + 1*2³ + 1*2⁴ + 0*2⁵ + 1*2⁶ = 1011111₂
95₁₀ = 7*8⁰ + 3*8¹ + 1*8² = 137₈
95₁₀ = 15*16⁰ + 5*16¹ = 5F₁₆
Var N,S: integer;
begin
N:=0;
S:=0;
while s<=47 do
begin
N:=n+1;
S:=s+2;
end;
write(N);
end.
Ответ: 24
3)
C:\информатика\рисунки\часть2\урок2.<span>doc</span>
<span>__________________________________</span>
Program m3;
var s,k,m:real;
begin
readln(m,k);
writeln('m=',m,' k=',k);
s:=(26*k-m)/(6-4*k-56*m*k);
writeln('s=',s);
<span>end.</span>