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

Составьте алгоритм на псевдокоде, который будет в цикле для переменной х = 0 прибавлять единицу и показывать результат. Цикл совершать 10 раз.

👇
Ответ:

начало

   переменная x равна 0

   переменная i равна 0

   while i < 10 делать

       x = x + 1

       i = i + 1

       вывод x

   endwhile

конец

Вариант 2:

begin

   x = 0

   i = 0

   while i < 10 do

   begin

        x = x + 1

        i = i + 1

        print x

   end

end.

Объяснение:

Псевдокод бывает разный, предлагаю свой вариант и ниже прикреплю вариант ближе к pascal

4,6(36 оценок)
Открыть все ответы
Ответ:
milashka455
milashka455
01.09.2022

Задача 1

I = K * i (I - объем информации, K - кол-во пикселей, i - вес одного пикселя / глубина цвета)

K = 1280 * 720 = 921600 пикселей

По формуле N = 2^i или i = \lceil {\log_2{N}} \rceil  

(N - кол-во цветов в палитре, i - глубина цвета)

Глубина цвета i = \lceil {\log_2{32768}} \rceil = 15 бит

I = K * i = 921600 * 15 = 13824000 бит

13824000.0 бит = 1728000.0 байт = 1687.5 Кбайт = 1.64794921875 Мбайт = 0.0016093254089355469 Гбайт = 1.57160684466362e-06 Tбайт

13824000.0 бит = 13500.0 Кбит = 13.18359375 Мбит = 0.012874603271484375 Гбит = 1.257285475730896e-05 Tбит

ответ: 13824000

Задача 2

Размеры:

1 дюйм = 2.45 см

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

15 * 1200 / 2.54 = 7087

15 * 1200 / 2.54 = 7087

I = K * i (I - объем информации, K - кол-во пикселей, i - вес одного пикселя / глубина цвета)

K = 7087 * 7087 = 50225569 пикселей

i = 32 бит

I = K * i = 50225569 * 32 = 1607218208 бит

1607218208.0 бит = 200902276.0 байт = 196193.62890625 Кбайт = 191.59534072875977 Мбайт = 0.18710482493042946 Гбайт = 0.00018271955559612252 Tбайт

1607218208.0 бит = 1569549.03125 Кбит = 1532.7627258300781 Мбит = 1.4968385994434357 Гбит = 0.0014617564447689801 Tбит

ответ: 1607218208

Задача 3

I = K * i (I - объем информации, K - кол-во пикселей, i - вес одного пикселя / глубина цвета)

i = I / K

K = 256 * 256 = 65536 пикселей

I = 64 Kb = 64 * 1024 * 8 бит = 524288 бит

Глубина цвета i = \frac{I}{K} = \frac{524288}{65536} = 8.0 бит

Кол-во цветов в палитре N = 2^i = 2^{8.0} = 256.0 цветов

ответ: 256.0

________________________________________________

- Считаем что 1 Гбайт = 2^30 = 1 073 741 824 байт

- '/' - разделить

- '*' - умножить

4,4(60 оценок)
Ответ:
GORDON228band
GORDON228band
01.09.2022

Program Nonenone;
uses crt;
var
  n,i:integer;
  max,v:real;
  yes: string;
begin
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  max:=0;
  yes:='NO';
  writeln('Введите количество машин (не больше 30 - у меня мало памяти!)');
  write('N = ');
  readln(n);
  if n>30 then
      writeln('Это слишком много!')
    else
      begin
        writeln('Вводите зарегистрированную скорость каждого автомобиля');
        for i:=1 to n do
          begin
            write(i,'-я машинка: ');
            readln (v);
            if v >300 then
                begin
                  writeln ('по-моему, твои приборы глючат - так быстро машины не ездят');
                  writeln ('Это число не будет учтено');
                end
              else
                begin  
                  if v<30 then yes:='YES';
                  if v>max then max:=v;
                end;
          end;
        writeln();
        writeln('Максимальная зарегистрированную скорость ',max);
        writeln('Cкорость меньше 30 км/ч? ',yes);
      end;
end.

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