1. Потому что нет денег на покупку.
2. Потому что негде купить, или это слишком сложно
3. Потому что жалко денег.
4. Даже не подозревают, что нарушают какие-то там права.
1) Ответ:3
25/2 11001
12(1)
6(0)
3(0)
1(1)
2)Ответ 4
18/8 101
8(1)
1(0)
Const n = 5;
var
i, p, x:byte;
z: array[1..n] of byte;
begin
readln(x);
for i:=1 to n do
begin
readln(z[i]);
if z[i]=x then p:=i;
end;
writeln(p);
end.
Цикл с заданным числом повторений (цикл-ДЛЯ)
<span>for <параметр> := <начальное значение> to <конечное значение> do <тело цикла<span>>
</span></span><span>После каждого выполнения цикла значение <</span>параметра> будет увеличиваться на 1.
Если проект под ОС Windows, то все, которые включены в библиотеку VCL (Delphi):
Label, Button, StringGrid, Edit, Image, Panel, StatusBar, Menu.... их очень много, все перечислять до утра можно.