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

В одной из кодировок Unicode каждый символ кодируется 16 битами.
Определите размер в байтах следующего предложения в данной кодировке:
Я к вам пишу – чего же боле? Что я могу ещё сказать?
ответ: .
Валя шифрует русские слова, записывая вместо каждой буквы её код.
А В Д О Р У
01 011 100 111 010 001
Дана кодовая цепочка:
01000110001
Расшифруйте слово. Запишите в ответе расшифрованное слово.
ответ: .
Для какого целого числа X ЛОЖНО высказывание:
(X > 3) ИЛИ НЕ (X > 2)?
ответ: .
1
2
3
Информатика. 9 класс. Вариант ИН1990304 3
© СтатГрад 2019−2020 уч. г. Публикация в интернете или печатных изданиях без письменного
согласия СтатГрад запрещена
Между населёнными пунктами A, B, C, D, E, F построены дороги,
протяжённость которых (в километрах) приведена в таблице.
A B C D E F
A 3 5 15
B 3 1
C 5 1 1
D 1 2 6
E 2 2
F 15 6 2
Определите длину кратчайшего пути между пунктами A и F. Передвигаться
можно только по дорогам, протяжённость которых указана в таблице.
ответ: .
У исполнителя Делитель две команды, которым присвоены номера:
1. раздели на 2
2. вычти 1
Первая из них уменьшает число на экране в 2 раза, вторая уменьшает его
на 1.
Исполнитель работает только с натуральными числами.
Составьте алгоритм получения из числа 65 числа 4, содержащий не более
5 команд. В ответе запишите только номера команд.
(Например, 12112 – это алгоритм:
раздели на 2
вычти 1
раздели на 2
раздели на 2
вычти 1,
который преобразует число 42 в число 4.)
Если таких алгоритмов более одного, то запишите любой из них.
ответ: .
4
5
Информатика. 9 класс. Вариант ИН1990304 4
© СтатГрад 2019−2020 уч. г. Публикация в интернете или печатных изданиях без письменного
согласия СтатГрад запрещена
Ниже приведена программа, записанная на пяти языках программирования.
С++ Python Паскаль
#include
using namespace std;
int main() {
int s, k;
cin >> s;
cin >> k;
if (s >= 2 * k)
cout << "ДА";
else
cout << "НЕТ";
return 0;
}
s = int(input())
k = int(input())
if s >= 2 * k:
print("ДА")
else:
print("НЕТ")
var s, k: integer;
begin
readln(s);
readln(k);
if s >= 2 * k
then writeln(‘ДА’)
else writeln(‘НЕТ’)
end.
Алгоритмический язык Бейсик
алг
нач
цел s, k
ввод s
ввод k
если s >= 2 * k
то вывод "ДА"
иначе вывод "НЕТ"
все
кон
DIM k, s AS INTEGER
INPUT s
INPUT k
IF s >= 2 * k THEN
PRINT ′ДА′
ELSE
PRINT ′НЕТ′
END IF
Было проведено 9 запусков программы, при которых в качестве значений
переменных s и k вводились следующие пары чисел:
(1, 2); (8, 4); (6, –12); (–5, –5); (3, 11); (–10, 12); (–10, –2); (4, 1); (2, 5).
Сколько было запусков, при которых программа напечатала «ДА»?
ответ: .
Доступ к файлу math.doc, находящемуся на сервере obr.ru, осуществляется по
протоколу https. Фрагменты адреса файла закодированы цифрами от 1 до 7.
Запишите последовательность этих цифр, кодирующую адрес указанного
файла в сети Интернет.
1) obr
2) /
3) .ru
4) .doc
5) ://
6) math
7) https

👇
Открыть все ответы
Ответ:
serega228002
serega228002
06.06.2020

var

 n, Num, i, j, t: integer;  

 Count: array[1..12] of integer;  

 Names: array[1..12] of integer;

begin

 for i := 1 to 12 do  

 begin

   Count[i] := 0;  

   Names[i] := i;  

 end;  

 ReadLn(N); { Считываем количество запросов}  

 for i := 1 to N do  

 begin

   ReadLn(t); {считали очередной запрос}  

   Count[t] := Count[t] + 1;  

 end;  

 {Сортируем массивы Names и Count в порядке убывания значений массива Count}  

 for i := 12 downto 2 do  

   for j := 2 to i do  

     if Count[j - 1] < Count[j] then  

     begin

       t := Count[j];

       Count[j] := Count[j - 1];

       Count[j - 1] := t;

       t := Names[j];

       Names[j] := Names[j - 1];

       Names[j - 1] := t;

     end;  

 for i := 12 downto 1 do  

   if Count[i] > 0 then  

     WriteLn(Names[i], ' ', Count[i]);  

end.

Объяснение:

4,5(78 оценок)
Ответ:
vladdendi
vladdendi
06.06.2020
1)var

a: array [1..30] of integer;

i, s, k: integer;

begin

for i := 1 to 30 do//заполнение рандомными числами(от -15 до 50, включая и -15 и 50) массив

a[i] := random(-15, 50);

for i := 1 to 30 do//сумма элементов и подсчет кратных 3

begin

s := s + a[i];//сумма элементов

if a[i] mod 3 = 0 then//подсчет кол во кратных 3

k := k + 1;

end;

writeln('Исходный массив');

for i := 1 to 30 do

writeln('A[', i, '] = ', a[i]);

writeln('Сумма элементов массива: ', s);

writeln('Кратных 3: ', k);

end.

извини бы дальше но дела но вот подсказки:

2) метод пузырька посмотри

3) там через функцию поиска и удаления

если над у меня есть группа в вк называется просто программки если интересно можешь глянуть

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