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

Раньше применительно к этому устройству говорили "эвм" ответ из 7 букв

👇
Ответ:
vovakornev2002
vovakornev2002
01.08.2022
Электронно-вычислительная машинка, возможно имеется в виду компьютер
4,6(64 оценок)
Открыть все ответы
Ответ:
lenok0701
lenok0701
01.08.2022
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

№1

begin
  var a:=ArrRandom(100,-50,50); a.Println;
  a.Transform(t->t.IsOdd?t*t:t); a.Println
end.

Пример
46 39 19 26 29 21 12 41 -46 33 10 -38 -6 -46 -4 11 -36 41 15 8 46 31 23 47 -28 26 22 -34 -29 44 40 -18 -15 0 10 -46 25 -41 29 -41 1 -31 -35 -46 15 -39 6 41 -38 49 -16 7 -8 10 19 -36 -35 22 3 -48 49 -5 20 -40 43 -22 28 45 -5 -8 37 -46 -38 5 -44 26 16 19 -18 -39 -30 31 -46 -28 9 -18 40 25 31 -5 39 -48 7 26 -40 -44 0 -46 -39 -13
46 1521 361 26 841 441 12 1681 -46 1089 10 -38 -6 -46 -4 121 -36 1681 225 8 46 961 529 2209 -28 26 22 -34 841 44 40 -18 225 0 10 -46 625 1681 841 1681 1 961 1225 -46 225 1521 6 1681 -38 2401 -16 49 -8 10 361 -36 1225 22 9 -48 2401 25 20 -40 1849 -22 28 2025 25 -8 1369 -46 -38 25 -44 26 16 361 -18 1521 -30 961 -46 -28 81 -18 40 625 961 25 1521 -48 49 26 -40 -44 0 -46 1521 169

№2

begin
  var a:=ArrGen(50,i->Sqr(i+1)); a.Println;
  Range(1,50,2).ForEach(i->begin a[i]*=a[i] end); a.Println
end.

Результат
1 4 9 16 25 36 49 64 81 100 121 144 169 196 225 256 289 324 361 400 441 484 529 576 625 676 729 784 841 900 961 1024 1089 1156 1225 1296 1369 1444 1521 1600 1681 1764 1849 1936 2025 2116 2209 2304 2401 2500
1 64 9 4096 25 46656 49 262144 81 1000000 121 2985984 169 7529536 225 16777216 289 34012224 361 64000000 441 113379904 529 191102976 625 308915776 729 481890304 841 729000000 961 1073741824 1089 1544804416 1225 2176782336 1369 3010936384 1521 4096000000 1681 5489031744 1849 7256313856 2025 9474296896 2209 12230590464 2401 15625000000
4,4(21 оценок)
Ответ:
Ксюша10012007
Ксюша10012007
01.08.2022
Константы в Pascal.
Иногда, бывает так, что у нас в программе встречаются величины, которые не меняются в процессе выполнения программы (т.е. фактически они противоположность переменных). Такие величины называются константами. Константы указываются в специальном ...
Функции Pred, Succ в Pascal.
В данном уроке мы рассмотрим функции, применяемые к типу CHAR. Функция Pred возвращает в качестве значения предшествующий символ, а функция Succ возвращает последующий символ.
Использование Var, Integer, Readln.
Процедура Readln используется не только для задержки экрана. Ее основная задача - ввод данных с клавиатуры. В этой статье мы научимся вводить числа с клавиатуры, и потом выводить их на экран. Для этого нам будет необходимо познакомиться с разделом ...
4,5(3 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ