1 флешка
2 карта
3 сканер
4 Брандма́уэр
5 Опция
6 спам
По кол-ву букв и по определению подходит, а для более точного совпадения выложите сам кроссворд
Var i,n:integer;
begin
n:=1;
i:=1;
write ('Числа не кратные 2 и 5: ');
while i<=8 do
begin
if (n mod 2 <> 0) and (n mod 5 <> 0) then
begin
write (n,' ');
i:=i+1;
end;
n:=n+1;
end;
end.
Только 1 задание сделаю
1 5 7 9 12
VB.
Dim i As Integer
Dim Massiv() As Integer
For i = 0 To Massiv.Length - 1
Massiv(i) += 4
<span>Next</span>
Кто такие вопросы кривые дает? Хотя не удивительно почему столько тупых программистов в наше время)
Если тактовую частоту увеличить в два раза то и производительность вырастит в два раза. А разрядность в три раза не увеличить т.к их всего два и они не влияют на производительность процессора.