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

Составьте словесный и графический алгоритм (блок схема) 1) заварка чая 2)определения расстояния если извесно время и его скорость ныдо 90

👇
Ответ:
Hsjsngzhsbdndhd
Hsjsngzhsbdndhd
08.02.2022
Решение в прикрепленных файлах
Составьте словесный и графический алгоритм (блок схема) 1) заварка чая 2)определения расстояния если
Составьте словесный и графический алгоритм (блок схема) 1) заварка чая 2)определения расстояния если
4,4(58 оценок)
Открыть все ответы
Ответ:
Afon7
Afon7
08.02.2022

Объяснение:

1. БЕЗ ПРИЗНАКОВ ЖИЗНИ (нет изображения, звуковых сигналов, не включаются светодиоды на системной плате и вентилятор ЦП)

2. ПК РАБОТАЕТ, НЕТ ИЗОБРАЖЕНИЯ (вентилятор ЦП работает, светодиоды материнской платы горят, но видеосигнала на мониторе нет)

3. BIOS ПРЕКРАЩАЕТ РАБОТУ (компьютер работает, но BIOS внезапно прекращает свою работу с ошибкой)

4. НЕ УДАЕТСЯ ЗАГРУЗИТЬ WINDOWS (появляется логотип ОС, но пользовательский интерфейс не загружается)

5. ПК РАБОТАЕТ СО СБОЯМИ (компьютер загружается, но «зависает» через некоторое время или под нагрузкой)

6. НЕ РАБОТАЮТ КОМПОНЕНТЫ ПК (проблемы с изображением или звуком, а также с портом USB и модулем Wi-Fi или приводом CD, DVD)

4,5(94 оценок)
Ответ:
insaimner
insaimner
08.02.2022

1.

program ll1;

var A: array[1..20] of integer;

i: integer;

begin

Randomize;

for i:=1 to 20 do

begin

A[i]:=random();

if A[i] mod 2 = 0 then writeln(A[i]);

end;

end.

2 .

program ll1;

const N = 20;

var A: array[1..20, 1..20] of integer;

i, j, k: integer;

begin

for i:=1 to N do

for j:=1 to N do

begin

readln(A[i, j]);

if (A[i, j] >= 0) and (A[i, j] < 10) then

k:=k+1;

end;

writeln(k);

end.

3.

program ll1;

var A: array[1..20] of integer;

k, x, y: integer;

begin

Randomize;

readln(x);

readln(y);

for k:=1 to 20 do

begin

A[k]:=random();

if A[k] >= 0 then

A[k]:=x;

else

A[k]:=y;

end;

end.

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