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

1.определите истинность или ложность простых высказываний: a = {текстовый процессор ms word – это прикладная программа}, в = {в ячейку электронной таблицы нельзя ввести формулу}, с = {монитор – устройство вывода информации}. подставьте значения а, в, с и определите истинность или ложность составного высказывания: a \/ с /\ (b \/ b → c) 2. статья, набранная на компьютере, содержит 12 страниц, на каждой странице 96 строк. информационный объем статьи составляет 90кбайт. определите количество символов в одной строке. для кодирования используется кодировка unicode, при которой каждый символ кодируется 2 байтами. 3. цветное растровое графическое изображение, палитра которого включает в себя 256 цветов, имеет размер 1024×768 точек (пикселей). какой объем видеопамяти компьютера (в кбайтах) занимает это изображение?

👇
Ответ:
orhideya68
orhideya68
04.05.2022

2) A = True; B = False; C = True

A \/ С /\ (B \/ ¬B → ¬C) = A \/ С /\ (B \/ ¬C) = 1 (True)

3) Вес одного пикселя = 8 бит = 1 байт

(1024 * 768 * 1) / 1024 = 768 Кбайт

4,5(5 оценок)
Открыть все ответы
Ответ:
markay
markay
04.05.2022

(см. объяснение)

Объяснение:

program task;

var i: integer;

const N=5;

procedure writeOut(i: integer);

begin

 if(i<N) then write(', ')

 else writeln('.');

end;

begin

 if(N<1) then begin writeln('N>0 и целое!'); exit; end;

 writeln('ЦИКЛ FOR:');

 for i:= 1 to N

   do begin

        write(i); writeOut(i);

      end;

 writeln;

 writeln('ЦИКЛ WHILE:');

 i:= 1;

 while(i<N+1)

   do begin

        write(i); writeOut(i);

        i:= i+1;

      end;

 writeln;

 writeln('ЦИКЛ REPEAT:');

 i:= 1;

 repeat

   write(i); writeOut(i);

   i:= i+1;

 until i=N+1;

end.

4,4(72 оценок)
Ответ:
YULEMESLEILAA
YULEMESLEILAA
04.05.2022
Pascal:
var n,a,s:longint;
begin
  repeat
    write ('N = ');
    readln(n);
  until n in [10..99];
  write ('A = ');
  readln(a);
  s:=0;
  while n<>0 do
    begin
       s:=s+n mod 10;
       n:=n div 10;
    end;
  if s>a then writeln ('YES') else writeln ('NO');
  readln;
end.

C++:
#include <iostream>
using namespace std;

int main()
{
   int a,n,s = 0;
   do
   {
      cout <<"N = ";
      cin >>n;
   }
   while (n<10 || n>99);
   cout <<"A = ";
   cin >>a;
   while (n!=0)
   {
     s+=n%10;
     n/=10;
   }
   if (s>a)
      cout <<"YES" <<endl;
   else cout <<"NO" <<endl;
   return 0;
}
4,4(80 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ