alobatsevi4
11.11.2022 02:20

Любой объект хранить информацию называется... *
диск
флеш накопитель
носитель информации
карта памяти
Носители информации,используемые в компьютере и электронике, деляна ... *

аналоговые и цифровые
электронные и бумажные
дисковые и виртуальные
Выберите, верную классификацию цифровых носителей информации. *

магнитные, оптические,флеш-накопители
дисковые, флеш-накопители, магнитные
оптические, дисковые, магнитные
Основная характеристика цифровых носителей информации- это *

достоверность
информационная емкость
цена
внешний вид
Процесс обеспечения секретности, целостности и доступности информации называется... *

кодирование
информационная безопасность
защита информации
декодирование
Программа которая скрытно работает в системе, с целью нанесения вреда компьютера. *

компьютерный вирус
архиватор
браузер
антивирус
Перечислите основные направления информационной безопасности. *

организационные меры
антивирусы, сетевые фильтры,организационные меры
антивирусные программы, пароли
Выберите верный алгоритм действий для установления пароля на документ Word. *

Файл-Сведения-Защитить документ-Зашифровать паролем
Сохранить файл-Зашифровать паролем
Вставка-Защита паролем
Вариант 4
Процесс, при котором создается точная копия данных и помещается в необходимое место. *

кодирование
копирование
шифрование
архивирование
Напишите слово, означающее выдачу чужого произведения за своё или незаконное опубликование чужого произведения под своим именем. *

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
myagkikhigorek
21.03.2020 15:24
1)
Var
n,m,max,min:integer;
Begin
write('Введите число: ');
readln(n);
min:=9;   
max:=0;
while n>0 do 
begin 
m:=n mod 10; 
if m<min then min:=m; 
if m>max then max:=m; 
n:=n div 10; end;   
writeln('Максимальное число: ',max);   
writeln('Минимальное число: ',min);
End.
2)
var
i,count: integer;
n,s:string;
begin
writeln('Введите число: ');
readln(s);
writeln('Введите цифру: ');
readln(n);
for i:=1 to length(s) do
if(s[i]=n)then
count:=count+1;
writeln('Количество раз, когда встречается цифра = ',count);
end.
0,0(0 оценок)
Ответ:
annet150586
07.03.2020 22:05

В n будем хранить количество чисел, которые ещё нужно вывести. a и b - предыдущее и текущее числа Фибоначчи. По определению, следующее число Фибоначчи равно сумме двух предыдущих, так что новое значение b будет a + b. Чтобы не заводить новую временную переменную, новое значение a можно будет найти, вычитая из нового b старое a, получится (a + b) - a = b.

Код процедуры:

procedure print_fib(n: integer);

var a, b, t: integer;

begin

   a := 0;

   b := 1;

   while n > 0 do

   begin

       write(b, ' ');

       b := a + b;

       a := b - a;

       n := n - 1;

   end;

end;

Пример основной программы:

begin

   print_fib(10)

end.

Вывод:

1 1 2 3 5 8 13 21 34 55

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота