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

Склавиатуры вводится число n, а за ним n элементов массива состоящего из целых чисел.проверить, все ли элементы массива положительны. если да, то ввести фразу "да", в противном случае-"нет".

👇
Ответ:
MadPrinter
MadPrinter
05.06.2020
Program massivn;
uses crt;
type massiv=array[0..50] of integer;
var a:massiv;   
n,i,k:integer;
begin
writeln('vvedite n');
readln(n);
for i:=1 to n do begin
a[i]:=random(100)-10;
write(a[i]:3);
end;
for i:=1 to n do
if a[i]>0 then k:=k+1;
writeln;
if k=n then writeln('DA') else writeln('NET');
end.
4,8(81 оценок)
Ответ:
Бокс111
Бокс111
05.06.2020
Const
  C = 100;
var  n, i : Integer;
  a    : array [1..C] of Integer;
  flag : Boolean;
begin
  Write('N: ');
  Readln(n);  

  if (n < 1) or (n > C) then
  begin
    Write('Ошибка, недопустимое число.');
    Exit;
  end;

  for i := 1 to n do
  begin
    Write('a[', i,']:= ');
    Readln(a[i]);
  end;  

  flag := False;
  for i := 1 to n do
    if a[i] < 1 then
    begin
      flag := True;
      Break;
    end;

  if flag then Writeln('НЕТ') else Writeln('ДА'); 
  Readln;
end.
4,7(6 оценок)
Открыть все ответы
Ответ:
Babaev11
Babaev11
05.06.2020
Исходное число 665675757
1)665675757:2=332837878 и в остатке 1
значит пишем 1
2)332837878:2=166418939 и в остатке 0
значит пишем 0
3)166418939:2=83209469 и в остатке 1
значит пишем 1
4)83209469:2=41604734 и в остатке 1
значит пишем 1
5)41604734:2=20802367 и в остатке 0
значит пишем 0
6)20802367:2=10401183 и в остатке 1
значит пишем 1
7)10401183:2=5200591 и в остатке 1
значит пишем 1
8)5200591:2=2600295 и в остатке 1
значит пишем 1
9)2600295:2=1300147 и в ост 1
зн пишем 1
10)1300147:2=650073 и в ост 1
зн пишем 1
11)650073:2=325036 и в ост 1
зн пишем 1
12)325036:2=162518 и в ост 0
зн  пишем 0
13)162518:2=81259 и в ост 0
зн пишем 0
14)81259:2=40629 и в ост 1
зн пишем 1
15)40629:2=20314 и в ост 1
зн пишем 1
16)20314:2=10157 и в ост 0
зн пишем 0
17)10157:2=5078 и в ост 1
зн пишем 1
18)5078:2=2539 и в ост 0
зн пишем 0
19)2539:2=1269 и в ост 1
зн пишем 1
20)1269:2=634 и в ост 1
зн пишем 1
21)634:2=317 и в ост 0
зн  пишем 0
22)317:2=158 и ост 1
зн пишем 1
23)158:2=79 и ост 0
зн пишем 0
24)79:2=39 и ост 1
зн пишем 1
25)39:2=19 и ост 1
зн пишем 1
26)19:2=9 и ост 1
зн пишем 1
27)9:2=4 и ост 1
зн пишем 1
28)4:2=2 и ост 0
зн пишем 0
29)2:2=1 и ост 0
зн пишем 0
30)1:2=0 и ост 1
зн пишем 1
число в двоичной системе 10110111110011010110101111001
4,5(76 оценок)
Ответ:
nastya291204061012
nastya291204061012
05.06.2020
1. При использовании палитры из 2^24 цветов для хранения цвета 1 пикселя используется 24 бита = 3 байта.
Пусть количество пикселей в рисунке K, тогда объем памяти, занимаемой одним рисунком = (K*3)/1024 + 128 Кбайт.
X = 8*(K*3/1024 + 128)+2.5*1024
2. При использовании палитры из 2^16 цветов для хранения цвета 1 пикселя используется 16 бита = 2 байта.
Объем памяти, занимаемой одним рисунком = (K*2)/1024 + 128 Кбайт.
X = 20*(K*2/1024 + 128)
8*(K*3/1024 + 128)+2.5*1024 = 20*(K*2/1024 + 128)
К = 65536 (количество пикселей в рисунке)
X = 20*(K*2/1024 + 128) = 20*(65536*2/1024 + 128) Кбайт = 
 20*(128 + 128) Кбайт = 5120 Кбайт = 5120/1024 Мбайт = 5 Мбайт
4,7(95 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ