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

Отметь верные ответы.
1. Информация это…
 сведения об окружающем мире
 новости, которые мы получаем только из газет
 человек получает информацию только при зрения
2. Отметь вид информации, которую обрабатывает компьютер
 текстовая
 графическая
 видеоинформация
 все ответы верны
3. Человек получает информацию…
 только при зрения
 только при слуха
 при органов чувств
 только ту информацию, которую можно услышать

👇
Ответ:
Den2228
Den2228
11.03.2020

1) Сведения об окружающем мире

2)Все ответы верны

3)При органов слуха

4,8(56 оценок)
Ответ:
tverikin1997
tverikin1997
11.03.2020

1- А

2- А

3- В

Объяснение:

Все ответы верно

4,5(43 оценок)
Открыть все ответы
Ответ:
olya75357
olya75357
11.03.2020
// PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017

begin
  var a:=ArrRandom(100,-20,20); a.Println;
  if a[:50].Average>a[50:].Average 
  then Println('Температура выше в первой половине')
  else Println('Температура выше во второй половине');
  var max:=a.Min;
  for var i:=0 to 98 do
   if (a[i]>max) and (a[i+1]=a[i]) then max:=a[i];
  Println(max,max);
end.

Пример:
-17 14 7 16 13 -19 13 -12 -16 -3 6 19 -10 -18 -2 -9 -8 -17 7 14 3 3 -12 -17 0 6 -11 7 9 17 -20 -15 4 -11 -13 19 -12 5 4 16 -18 -1 -5 -18 -9 -9 10 -14 11 10 -18 18 8 19 5 1 6 3 -5 -14 13 -15 0 -12 -4 1 -6 -19 15 -1 -18 8 0 11 12 -16 -13 -15 13 -12 17 -18 17 19 14 -17 -3 6 4 7 -7 5 -11 -2 -17 18 20 -13 6 10
Температура выше во второй половине 
3 3 
4,4(13 оценок)
Ответ:
amina327
amina327
11.03.2020
1)uses crt;
const n=5;
m=5;
var a:array[1..n,1..m] of integer;
pr,i,j:integer;
begin
for i:=1 to n do
begin
for j:=1 to m do
read(a[i,j]);
end;
writeln;
pr:=1;
for i:=1 to n do
for j:=2 to 2 do
if (a[i,j]<0) and (a[i,j] mod 2=0) then pr:=pr*a[i,j];
writeln(pr);
end.
2)uses crt;
const n=5;
m=5;
var b:array[1..n] of integer;
a:array[1..n,1..m] of integer;
min,i,j,r:integer;
begin
for i:=1 to n do
begin
for j:=1 to m do
read(a[i,j]);
end;
writeln;
min:=1000;
r:=1;
repeat
for i:=r to r do
for j:=1 to m do
if a[i,j]<min then begin min:=a[i,j]; b[r]:=a[i,j] end;
min:=1000;
inc(r);
until r>n;
for i:=1 to n do
write(b[i],' ');
end.
4,8(43 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ