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

1. отметьте объект операционной системы: а) рабочий стол б) процессор в) модем г)компьютер 2. отметьте техническую систему: а) солнечная система б) футбольная команда в)банк г) автомобиль 3. сколько ячеек содержится в группе а2: d2

👇
Ответ:
OtvettePlz
OtvettePlz
02.02.2023
1 - а) рабочий стол  2 - г ) автомобиль 3 - 4 ячейки.
4,4(83 оценок)
Ответ:
sasha33427
sasha33427
02.02.2023
1. процессор
2. футбольная команда
4,8(54 оценок)
Открыть все ответы
Ответ:
AntonovnaAlina200
AntonovnaAlina200
02.02.2023

1. Человек воспринимает информацию о тембре голоса с

4) слуха

2. Не является действием с информацией:

3) покраска окон

4. Действия по обработке информации:

3) перевод текста

Человек воспринимает информацию о форме листьев с

3) зрения

6. Не является действием с информацией:

1) участие в забеге

9.Тактильную информацию человек получает посредством

d. органов осязания.

10.Информация – это…

c) сведения об окружающем мире и протекающих в нем процессах, воспринимаемые человеком непосредственно или с специальных устройств

4,4(48 оценок)
Ответ:
fedyuningleb20
fedyuningleb20
02.02.2023

Есть пара неясностей в условии. Если допускается такое, что единица и само число тоже являются делителями, то берите первый вариант решения, иначе - берите второе.

И еще кое-что: если нужно хотя бы 4 делителя, то оставьте все как есть, а если нужно ровно четыре делителя, в строчке if k>=4 then write(i:3); уберите знак > .

 

1 вариант.

program zadacha;

var n, i, j, k : byte;

begin

write('введите число N');

for i:= 1 to n do begin

k:=0;

for j:= 1 to i do

if i mod j =0 then k:=k+1;

if k>=4 then write(i:3);

 

2 вариант.

program zadacha;

var n, i, j, k : byte;

begin

write('введите число N');

for i:= 1 to n do begin

k:=0;

for j:= 2 to (i-1) do

if i mod j =0 then k:=k+1;

if k>=4 then write(i:3);

 

4,4(92 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ