ponomariov17p01k9s
27.12.2021 22:09

Исправьте ошибку в коде. Программа Visual basic 6.0
Работа с циклом "для"


Исправьте ошибку в коде. Программа Visual basic 6.0 Работа с циклом для

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Манюня589
15.10.2021 18:28
Во-первых, деловые документы они тоже переводят, мягко говоря, неважно.
А во-вторых, художественное произведение невозможно перевести на другой язык по принципу "слово в слово". В любом живом языке существует большая зависимость смысла не только отдельных слов, но даже фраз от контекста, т.е. от окружения. У каждого народа собственная идеоматика. А пословица, переведенная на другой язык, зачастую полностью утрачивает свой смысл. Вот, к примеру, английская фраза "Curiosity kills the cat" (Любопытсто убило кошку). Оказывается, это английская пословица - аналог нашей "Любопытной Варваре нос оторвали". Невозможно все это втиснуть в программу-переводчик. Как перевести Jabberwacky - название стихотворения из кэрроловской "Алисы..."? Корней Чуковский использовал слово "Бармаглот". А что делать программе переводчику? Как перевести на иностранный язык детские рассказы Людмилы Петрушанской про калушу, которая "сяпала по напушке и увазила бутявку"?
0,0(0 оценок)
Ответ:
SuperSanii
28.09.2020 04:51
// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('*** Исходный массив 9x6 ***');
  var a:=MatrRandom(9,6,-50,50); a.Println(4);
  Writeln(4*a.ColCount*'-');
  var kn:=a.Rows.SelectMany(x->x).Where(x->x<0).Count;
  var kp:=a.Rows.SelectMany(x->x).Where(x->x>0).Count;
  Writeln(kn,' отрицательных, ',kp,' положительных')
end.

Пример
*** Исходный массив 9x6 ***
 -47  37  23 -34 -33   0
 -17  -5  13  -9   0 -46
 -41  31  41 -30 -24  49
  39  50  13   4  19  14
 -17 -12 -24  22  -9 -44
 -27  17 -44 -35  -4  32
  26  -5  49  -7 -28 -25
 -15  -9  13  25 -26 -29
 -40 -24  -4  50  33 -45

31 отрицательных, 21 положительных
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота