М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Poli2533
Poli2533
19.12.2022 19:49 •  Информатика

Найдите и зачеркните лишнюю клавишу в каждой группе. 1 группа-shift,ctrl,home,esc 2 группа-a,f,f1,пробел 3 группа-home,end,f12,pageup 4 группа-! 1,*8,+=,* наверное это легко,но я вообще не понимаю информатику!

👇
Ответ:
sametovarnur
sametovarnur
19.12.2022
1 группа - home
2 группа - F1
3 группа - F12
4 группа - *
4,5(11 оценок)
Ответ:
kazimirova2009
kazimirova2009
19.12.2022
1)Home - остальные клавиши находятся на краю клавиатуры, а Home в правой её части.
2)F1 - остальные клавиши являются клавишами ввода, а F1 это функциональная клавиша.
3)F12 - остальные клавиши находятся в левой части и сгруппированы в единую группу из Insert, Home, Page Up/Down, Delete, End, а F12 - клавиша в группе над цифрами.
4)* - лишняя, т.к. ей не дана пара; каждой цифре дана пара на клавиатуре, а к * пара не указана.

Не забудьте сделать решение лучшим!
4,6(3 оценок)
Открыть все ответы
Ответ:
sofia308
sofia308
19.12.2022

В 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

4,8(52 оценок)
Ответ:
таня647
таня647
19.12.2022
Var a,k1,k2,s:integer;
begin
writeln('Вводите целые числа. Конец ввода - 0');
k1:=0;
k2:=0;
s:=0;
readln(a);
while a<>0 do
 begin
 if (a mod 2 = 0)and(a<0) then k1:=k1+1;
 if a mod 2 <> 0 then begin k2:=k2+1; s:=s+a; end;
 readln(a);
 end;
writeln('количество четных отрицательных чисел = ',k1);
if k2>0
 then writeln('среднее арифметическое нечётных чисел = ',s/k2)
 else writeln('в последовательности нет нечётных чисел');
end.

Пример:
Вводите целые числа. Конец ввода - 0
18
-45
10
-62
70
0
количество четных отрицательных чисел = 1
среднее арифметическое нечётных чисел = -45
4,7(50 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ