В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Androidekstas
Androidekstas
10.08.2021 03:05 •  Информатика

14. При каких значениях а и b условие a < b будет истинным?

A) a = 2, b = 5; B) a = 5, b = 2; C) a = 2, b = 2.

15. Записать логическое выражение для неравенства: x  1 или x > 9

16. Найти значение величины с после выполнения фрагмента программы:

If b<=10 then c:= 15 else c:=2, если b = 10.
17. Какое значение логического выражения (х<5) or (x>=10), если х = 3?
A) четное; B) нечетное; C) true; D) false.
18. Составить программу для вычисления Y=
19 Программа с CASE «По числу А€[0,1000)сообщение: 1-значное,2-х,3-х.
20) Определить значение переменных после выполнения цикла
у := 1; for k := 6 downto 3 do y := y + k;

Показать ответ
Ответ:
refwqef
refwqef
18.04.2020 08:50
//Pascal ABC.NET v3.0 сборка 1111

var
 i,a,b:integer;
 ar:array[1..10] of integer;

 procedure oddDec(var a,b:integer);  //подпрограмме переданы аргументы a и b
//процедура для вычитания в нечётном элементе
begin;
a:=a-b;
end;

procedure NotoddInc(var a,b:integer); //подпрограмме переданы аргументы a и b
//процедура для сложения в чётном элементе
begin;
a:=a+b;
end;

begin
randomize;
readln(a); //ввод a
readln(b); //ввод b
writeln('Array:');
for i:=1 to 10 do //весь массив
 begin;
  ar[i]:=random(-20,80); //случайные числа от -20 до 80 включительно
  write(ar[i]:4); //вывод
  if odd(i) then oddDec(ar[i],b) else NotoddInc(ar[i],a);
  {если нечётное, то первая процедура, иначе вторая. Обращаю внимания на то, что элементы меняются сразу после вывода}
 end;
writeln;
writeln('Final array:'); //вывод получившегося массива
for i:=1 to 10 do
write(ar[i]:4);
end.

Пример ввода:
20
10
Пример вывода:
Array:
  10  16   0  60  23   4  22 -20   4  55
Final array:
   0  36 -10  80  13  24  12   0  -6  75  
0,0(0 оценок)
Ответ:
tori0077
tori0077
20.10.2021 18:36

a - 11010000 10110000

б - 11010000 10110001

в - 11010000 10110010

г - 11010000 10110011

д - 11010000 10110100

е - 11010000 10110101

ё - 11010001 10010001

ж - 11010000 10110110

з - 11010000 10110111

и - 11010000 10111000

й - 11010000 10111001

к - 11010000 10111010

л - 11010000 10111011

м - 11010000 10111100

н - 11010000 10111101

о - 11010000 10111110

п - 11010000 10111111

р - 11010001 10000000

с - 11010001 10000001

т - 11010001 10000010

у - 11010001 10000011

ф - 11010001 10000100

х - 11010001 10000101

ц - 11010001 10000110

ч- 11010001 10000111

ш - 11010001 10001000

щ - 11010001 10001001

ъ - 11010001 10001010

ы - 11010001 10001011

ь - 11010001 10001100

э - 11010001 10001101

ю - 11010001 10001110

я - 11010001 10001111

Цифры:

1 - 110001

2 - 110010

3 - 110011

4 - 110100

5 - 110101

6 - 110110

7 - 110111

8 - 111000

9 - 111001

10 - 110001 110000

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