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

Напишите сочинение на тему "компьютер хорошо или плохо

👇
Ответ:
Onalbaeva00
Onalbaeva00
15.07.2021

   Компьютер это полезная вещь с него мы можем искать информацию в интернете, играть, смотреть мультики.  Но компьютер  наносит много вреда нашим глазам.

  Глаза устают если долго смотреть на экран компьютера. Таким образом портится зрение человека.  

  Многие люди используют компьютер для учёбы. Они занимаются на компьютере, делают домашку. Но часто компьютер мешает им выполнять какие либо задания. Это может быть реклама выскакивающая на половину экрана, игры в которые хочется поиграть. Да и сам интернет полон спама и рекламы.

  Поэтому каждый человек выбирает для себя хорошо это или плохо. У компьютера есть много своих плюсов, так и много минусов. Но я считаю, что компьютер это не опходимая вещь в каждом доме.

ну как-то так

4,7(35 оценок)
Открыть все ответы
Ответ:
mileven353
mileven353
15.07.2021
Const
  n = 11;

var
  x: array[1..n] of integer;
  i, k, d, s: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  k := 0; s := 0;
  for i := 1 to n do
  begin
    d := Random(11) - 5;
    Write(d:3);
    if (i mod 2) = 0 then begin { четное место }
      if d = 1 then Inc(k);
      x[i] := d
    end
    else begin
      if d < 0 then s := s + d;
      x[i] := sqr(d)
    end
  end;
  Writeln;
  Writeln('Результирующий массив');
  for i := 1 to n do Write(x[i]:3);
  Writeln;
  Writeln('Количество единиц на четных местах равно ', k);
  Writeln('Сумма отрицательных элементов на нечетных местах равна ', s)
end.

Тестовое решение:
Элементы массива
 -3  0 -5  1  5  1 -3 -4  5 -3 -2
Результирующий массив
  9  0 25  1 25  1  9 -4 25 -3  4
Количество единиц на четных местах равно 2
Сумма отрицательных элементов на нечетных местах равна -13
4,8(90 оценок)
Ответ:
Arukaa2087
Arukaa2087
15.07.2021
№1

var x, F: real;
begin
write('Введите х: ');
readln(x);
if ( x > -2.4 ) AND ( x < 5.7 ) then F := sqr(x)
else F := 4;
writeln('F = ', F);
end.

№2

var x, F: real;
begin
write('Введите х: ');
readln(x);
if ( x > 0.2 ) AND ( x < 0.9 ) then F := sin(x)
else F := 1;
writeln('F = ', F);
end.

№3

var a,b,c: real;
begin
write('Введите а: ');
readln(a);
write('Введите b: ');
readln(b);
write('Введите c: ');
readln(c);
if ( a < b ) AND ( b < c ) then writeln('a < b < c')
else
if ( b > a ) AND ( a > c ) then writeln('b > a > c')
else
writeln('Неравенства не выполняются');
end.
4,6(28 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ