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

52. Зачеркните •лишнее» слово, присутствующее в каждой строке. Будьте готовы объяснить, почему вы так считаете:
1) щука, карась, окунь, рак;
2) ромашка, ландыш, сирень, колокольчик;
3) Саша, Лена, Коля, Маша, Егорова;
4) ветка, листок, яблоко, цветок, птичка;
5) заяц, волк, кабан, лось, овца;
6) ухо, лицо, нос, язык, глаз;
7) рысь, медведь, тигр, лев, кошка;
8) шайба, коньки, качели, клюшка;
9) гусь, лебедь, павлин, курица, кролик;
10) пот, потолок, потливый, запотевший;
11) горе, нагорный, горевать, горемыка;
12) Тибет, Кавказ, Альпы, Байкал;
13) Россия, Франция, Петербург, Китай;
14) Африка, Индия, Австралия, Южная Америка;
15) диван, кровать, тетрадь, шкаф, парта;
16) дряхлый, старый, изношенный, маленький, ветхий;
17) молоко, сыр, сливки, сметана, сало;
18) подлежащее, глагол, дополнение, определение;
19) пять, пятёрка, пятерня;
20) четырёхугольник, четыре, четвёрка;
21) ножницы, дрожжи, щипцы, башмаки;
22) брюки, хлопоты, дверцы, вилы;
23) дебри, прения, игры, шахматы;
24) носок, мозоль, георгин, помидор;
25) магистраль, вестибюль, бандероль, лазурь;
26) озимь, цитадель, фланель, панцирь;
27) подстаканник, подорожник, подснежник, подлокотник;
28) текст, число, график, бумага;
29) клавиатура, джойстик, сканер, принтер;
30) монитор, графопостроитель, принтер, мышь;
31) флеш-память, дискета, компакт-диск, процессор;
32) обработка, хранение, калькулятор, передача.

👇
Ответ:
schestakov78
schestakov78
26.10.2021
1) рак рыбы),
2) сирень (цветы),
3) Егорова (имена),
4) птичка (растения),
5) овца (дикие животные),
6) лицо (части лица),
7) кошка (дикие животные),
8) качели (хоккей),
9) кролик (птицы),
10) потолок (однокоренные слова),
11) нагорный (однокоренные слова),
12) Байкал (горы),
13) Петербург (страны),
14) Индия (материки),
15) тетрадь (мебель),
16) маленький (степень старения),
17) сало (молочные продукты),
18) глагол (члены предложения),
19) пять (существительные),
20) четырёхугольник (оценки),
21) башмаки (множественное число),
22) дверцы (множественное число),
23) игры (множественное число);
24) мозоль (мужской род);
25) вестибюль (женский род);
26) панцирь (мужской род);
27) подорожник (приставка под-);
28) бумага (форма представления информации);
29) принтер (устройства ввода информации);
30) мышь (устройства вывода информации);
31) процессор (устройства хранения информации);
32) калькулятор (информационный процесс)
4,8(77 оценок)
Открыть все ответы
Ответ:
Neuch18
Neuch18
26.10.2021
Uses crt;
var ksl,ksm:longint;
a:array of integer; 
i,sred,k:integer;   
f:Text;
s:string;
BEGIN
clrscr;    
Assign(f,'f1.txt');
Reset(f); //из файла  
while not eof(f) do  
  begin
    readln(f,s); 
    ksm:=ksm+length(s); //считаем все символы 
  end; 
writeln(ksm);  
Reset(f);  for i:=1 to ksm do      
   begin   
       if (s[i]=' ') then            
       ksl:=ksl+1;//считаем все слова   
   end; 
writeln(ksl); 
Reset(f); //из файла
setlength(a,ksl+1);  
for i:=1 to ksl do 
     begin   
        read(f,a[i]); 
     end;
Close(f);
For i:=1 to ksl do   
     begin   
        If (a[i]=0) then a[i]:=a[1]+a[ksl]; // '' все нулевые компоненты значением суммы первой и последней компонент файла''
       if (a[i]>0) then
              begin   
                   sred:=sred+a[i]; // ''найти среднее арифметическое положительных компонент''   
                   inc(k); 
              end;       
       if (a[i]<0)then a[i]:=a[i]- ABS( a[1]+a[ksl] );  // ''все отрицательные компоненты уменьшить на значение суммы''   
     end;
Rewrite(f); //в фаил
for i:=1 to ksl do 
    begin       
       write(f,a[i],' ');     
    end;
Close(f); 
Writeln(' sred= ',sred/10:0:1);
END.
4,4(30 оценок)
Ответ:
aiym19
aiym19
26.10.2021
Const
handsfree = true;

type
mas100_100 = array[1..100, 1..100] of integer;

var
a1, a2, a3: mas100_100;
i, j, m, n: integer;

procedure InitializeMatrix(var a: mas100_100; m, n: integer);
var
i, j: integer;
begin
writeln('Данные матрицы');
for i := 1 to m do 
begin
for j := 1 to n do
if handsfree then begin
a[i, j] := random(30);
write(a[i, j]:2, ' ')
end
else
read(a[i, j]);
writeln;
end;
end;

begin
writeln('Введите размер матриц');
readln(m, n);

InitializeMatrix(a1, m, n);
InitializeMatrix(a2, m, n);

writeln('Вывод результата');
for i := 1 to m do 
begin
for j := 1 to n do 
begin
a3[i, j] := a1[i, j] * a2[m + 1 - i, n + 1 - j];
write(a3[i, j], ' ');
end;
writeln;
end;

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