оллл11
26.01.2021 19:18

1) Разработчиком языка Паскаль является:

1. Блез Паскаль
2. Никлаус Вирт
3. Норберт Винер
4. Эдсгер В. Дейкстра

2) Что из нижеперечисленного НЕ входит в алфавит языка Пас­каль?

1. латинские строчные и прописные буквы
2. служебные слова
3. русские строчные и прописные буквы
4. знак подчёркивания

3) Какая последовательность символов НЕ может служить именем в языке Паскаль?

1. _mas
2. maS1
3. d2
4. 2d

4) Вещественные числа имеют тип данных:

1. real
2. integer
3. boolean
4. string

5) В программе на языке Паскаль обязательно должен быть:

1. заголовок программы
2. блок описания используемых данных
3. программный блок
4. оператор присваивания

6) Какого раздела не существует в программе, написанной на языке Паскаль?

1. заголовка
2. примечаний
3. описаний
4. операторов

7) Языковые конструкции, с которых в программах за­писываются действия, выполняемые в процессе решения зада­чи, называются:

1. операндами
2. операторами
3. выражениями
4. данными

8) Разделителями между операторами служит:

1. точка
2. точка с запятой
3. пробел
4. запятая

9) Описать переменную — это значит указать её:

1. имя и значение
2. имя и тип
3. тип и значение
4. имя, тип и значение

10) В данном фрагменте программы:
program error;
begin
SuMmA:=25-14;
end.
ошибкой является:

1. некорректное имя программы
2. не определённое имя переменной
3. некорректное имя переменной
4. запись арифметического выражения

11) Какая клавиша нажимается после набора последнего данного в операторе read?

1. Enter
2. точка с запятой
3. пробел
4. Ctrl

12) При присваивании изменяется:

1. имя переменной
2. тип переменной
3. значение переменной
4. значение константы

13) Для вывода результатов в Паскале используется оператор:

1. begin
2. readln
3. write
4. print

14) Для вычисления квадратного корня из х используется функ­ция:

1. abs (х)
2. sqr (х)
3. sqrt(х)
4. int (х)

15) Для генерации случайного целого числа из интервала [10, 20) необходимо использовать выражение:

1. random*20
2. random (20)
3. random(10)+10
4. random(10)*2

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
тося42
24.01.2021 16:47
1) Допустим, бумагу мы сложим в бак 3. Это будет 83 + 58 = 141.
Тогда в бак 2 надо сложить стекло или жесть.

1) а) Допустим, мы в бак 2 сложили стекло. Это будет 52 + 85 = 137.
Тогда в бак 1 кладем жесть. Это будет 95 + 75 = 170.
Всего 141 + 137 + 170 = 448 перемещений.

1) б) Допустим, мы в бак 2 сложили жесть. Это будет 64 + 75 = 139.
Тогда в бак 1 кладем стекло. Это будет 98 + 85 = 183.
Всего 141 + 139 + 183 = 463 > 448.

2) Допустим, бумагу мы сложили в бак 2. Это опять 83 + 58 = 141.
2) а) Кладем в бак 3 стекло. Это будет 98 + 52 = 150.
Тогда в бак 1 кладем жесть. Это будет 95 + 75 = 170.
Всего 141 + 150 + 170 = 461 > 448.

2) б) Кладем стекло в бак 1. Это будет 98 + 85 = 183.
Тогда в бак 3 кладем жесть. 64 + 95 = 159
Всего 141 + 183 + 159 = 483 > 448.

3) Положим бумагу в бак 1. Это будет 83 + 83 = 166.
3) а) Положим стекло в бак 2. Это будет 52 + 85 = 137.
Тогда жесть пойдет в бак 3. 64 + 95 = 159.
Всего 166 + 137 + 159 = 465 > 448.

3) б) Положим стекло в бак 3. Это будет 52 + 98 = 150.
Тогда жесть пойдет в бак 2. Это будет 64 + 75 = 139.
Всего 166 + 150 + 139 = 455 > 448.

Я рассмотрел все 6 вариантов разложить 3 мусора по 3 бакам.
ответ: минимальное количество перемещений равно 448.
0,0(0 оценок)
Ответ:
даша5501
09.02.2023 10:16
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
procedure GetProdNeg(a:array of integer; var p:real);
// произведение отрицательных элементов
begin
  p:=a.Where(x->x<0).Aggregate(1.0,(p,e)->p*e)
end;

function IsPrime(n:integer):boolean:=
  Range(2,Round(sqrt(n))).All(i->n mod i<>0);

procedure ArrPrime(n:integer; var a:array of integer);
// массив простых чисел не больших n
begin
  a:=Range(2,n).Where(i->IsPrime(i)).ToArray
end;

begin
  var n:=ReadInteger('n=');
  var a:=ArrRandom(n,-50,50); a.Println;
  var r:real;
  GetProdNeg(a,r);
  Writeln('Произведение ',r);
  n:=ReadInteger('n=');
  var b:array of integer;
  ArrPrime(n,b);
  b.Println
end.

Тестовое решение:
n= 15
27 -7 -36 40 -15 -21 -47 -28 -12 45 3 -38 -15 1 -39
Произведение 27866837980800
n= 300
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 193 197 199 211 223 227 229 233 239 241 251 257 263 269 271 277 281 283 293
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота