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

Решается судьба! ! на ! в ниже пословицах и поговорках отдельные слова или несколько последовательно идущих букв образуют термин, связанный с информатикой и икт. искомые термины начинаются на букву, оформленную жирным
начертанием. найдите их. прокомментируйте найденные термины. а: где хотите, там и бранитесь, а на табаке помиритесь. б: умел ошибиться, умей и поправиться. в: рожь кормит сплошь, а пшеничка по выбору. г: всякая птица свое
гнездо любит. д: широка дорожка ерошке. е: и мед горчит, если его много. ж: ржавое железо не блестит. з: если мало в привозе, то много в запросе. и: истина выдерживает проверку опытом. к: вода размывает канал в слабом месте. л:
глупа та птица, которой гнездо свое не мило. м: на ходу подметки режет. н: где хвост — начало, там голова — мочало. о: всякой молодец на свой образец. п: закон — что паутина: шмель проскочит, а муха увязнет. р: дело сделал на
копейку, а раструбил на всю деревню. с: долгие сборы на короткий век. т: юность — время золотое: ест, и пьет, и спит в покое. у: шито-крыто, а узелок-то тут. ф: два фонаря на пустой каланче. х: как не хитри, а правды не перехитришь.
ц: цветет старость сединою. ч: к мягкому воску печать, к молодому – ученье. ш: шумит дубровушка к погодушке. щ: сигарета — щелчок по легким, бутылка пива — удар по почкам, рюмка водки — убийство печени, кусок сала — прессинг
желудка. э: каково эхо, такова и конюшня. ю: верный вассал двум сюзеренам не служит. я: откладывать в долгий ящик.

👇
Ответ:
polisha014
polisha014
01.02.2021

А:    Где хотите, там и бранитесь, а на табаке помиритесь.

Б:    Умел ошибиться, умей и поправиться.

В:    Рожь кормит сплошь, а пшеничка по выбору.

Г:    Всякая птица свое гнездо любит.

Д:    Широка дорожка Ерошке.

Е:    И мед горчит, если его много.

Ж:   Ржавое железо не блестит.

З:    Если мало в привозе, то много в запросе.

И:    Истина выдерживает проверку опытом.

К:    Вода размывает канал в слабом месте.

Л:    Глупа та птица, которой гнездо свое не мило.

М:   На ходу подметки режет.

Н:    Где хвост — начало, там голова — мочало.

О:    Всякой молодец на свой образец.

П:    Закон — что паутина: шмель проскочит, а муха увязнет.

Р:    Дело сделал на копейку, а раструбил на всю деревню.

С:   Долгие сборы на короткий век.

Т:   Юность — время золотое: ест, и пьет, и спит в покое.

У:   Шито-крыто, а узелок-то тут.

Ф:  Два фонаря на пустой каланче.

Х:   Как не хитри, а правды не перехитришь.

Ц:   Цветет старость сединою.

Ч:   К мягкому воску печать, к молодому – ученье.

Ш:  Шумит дубровушка к погодушке.

Щ:  Сигарета — щелчок по легким, бутылка пива — удар по почкам,
      рюмка водки — убийство печени, кусок сала — прессинг желудка.

Э:   Каково эхо, такова и конюшня.

Ю:  Верный вассал двум сюзеренам не служит.

Я:   Откладывать в долгий ящик.

4,7(32 оценок)
Открыть все ответы
Ответ:
Алёна16578
Алёна16578
01.02.2021
1. Программа в одной из современных версий Паскаля:

// PascalABC.NET 3.1, сборка 1211 от 31.03.2016
begin
  var s:=ReadlnString('Исходная строка:');
  Writeln('Результат: ',s.MatchValues('[a-zA-ZА-Яа-яёЁ]').JoinIntoString(''));
end.

Тестовое решение:

Исходная строка: // PascalABC.NET 3.1, сборка 1211 от 31.03.2016
Результат: PascalABCNETсборкаот

2. Программа в "школьной версии"

// PascalABC.NET 3.1, сборка 1211 от 31.03.2016
const
  legal=['A'..'Z','a'..'z','А'..'Я','а'..'я','Ё','ё'];
var
  s:string;
  i:integer;
begin
  Write('Исходная строка: '); Readln(s);
  for i:=Length(s) downto 1 do
    if not(s[i] in legal) then Delete(s,i,1);
  Writeln('Результат: ',s);
end.
4,7(30 оценок)
Ответ:
benten2434
benten2434
01.02.2021
Const n=10; 
var a,b:array[1..n] of integer;
i,k:integer; 
begin
writeln('План поставки:');
for i:=1 to n do
 begin
 a[i]:=random(11)+5;
 write(a[i]:3);
 end;
writeln;
writeln('Поставлено:');
for i:=1 to n do
 begin
 b[i]:=random(11)+5;
 write(b[i]:3);
 end;
writeln;
k:=0;
writeln('Получили трактора сверх плана колхозы:');
for i:=1 to n do
 begin
 if a[i]>b[i] then k:=k+1;
 if a[i]<b[i] then write(i,' ');
 end;
writeln;
writeln('Количество колхозов, недополучивших трактора = ',k);
end.

Пример:
План поставки:
 11  8  9  8 10  9 10  9 14  8
Поставлено:
 13  5  9 11  7  9  7 14  7 15
Получили трактора сверх плана колхозы:
1 4 8 10 
Количество колхозов,  недополучивших трактора = 4
4,6(81 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ