program count3;
const
N=10;
var a: array [1..N] of integer;
i,count : integer;
begin
count:=0;
cls;
writeln ('Массив [-5;5]');
for i:=1 to N do begin
A[i]:=random (11)-5;
write (A[i]:4);
if A[i] = 3 then
count:=count+1;
end;
writeln;
writeln ('Количество троек в массиве : ', count);
<span>end.</span>
Что нужно сделать чтобы вообще получить 21?
Прийти к нему из чисел 24 или 16.
В 24 мы можем прийти из 30 два раза сходив назад.
В 16 за три отхода назад на 3 прийти нельзя
-> ответ 3
вперед 5 6 раз
назад 3 3 раза
2)b=6*9-4=50
a=50/5*3-4=26
3) a=2*100+50=250
b=250*2-400=100
1) 1/2 Кб = 4096 бит
2) 0,25 Кб = 256 байт
3) 2¹⁶ бит = 8 Кб
4) 2²⁵ бит = 4 Мб
5) 2³⁷бит = 16 Гб
Исходное число: 103
3*(100х+10у+3)+1=300+10х+у
290+29у=290
10х+у=10
так как числа у нас целые, то х=1, у=0.
Подставляем в формулу исходного числа:
100х+10у+3=100+0+3=103.
---
проверка:
103*3+1=309+1=310
103 ->310 (перестановка цифры 3 начало)
310=310 - верно.
--