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

Что означает оператор inc в паскале в данном случае и на сколько увеличение?Var A:array[1..20,1..20] of integer;
i,j,n,k,s:integer;
Begin
write('Введите размерность: ');readln(n);
For i:=1 to n do
Begin
For j:=1 to n do
Begin
A[i,j]:=random(31)-15;
write(A[i,j]:4);
End;
writeln;
End;
k:=0;s:=0;
For i:=1 to n do
For j:=1 to n do
if (i0) then
Begin
inc(k);
s:=s+A[i,j];
End;
writeln('Сумма положительных над главной диагональю: ',s);
writeln('Кол-во положительных над главной диагональю: ',k);
readln;
End.

Показать ответ
Ответ:
steeg99
steeg99
07.12.2022 05:33

Для того, чтобы определить какое значение будет принимать переменная Х, после выполнения фрагмента исходной программы, пройдем по этой программе вручную следующим образом:

1) а: =4, b: = 5, с: = 3.

2) If a > b then x: = a + b

4 > 5 - не верно, значит переходим на следующий шаг программы после ключевого слова else:

3) else begin

a: = b + c = 5 + 3 = 8; получили, что значение a теперь равняется 8.

x:= а - 3 * b = 8 - 3 * 5 = 8 - 15 = -7.

4) Поскольку следующим идет команда end, значит программа завершает и получаем значение x: = -7.

Таким образом правильный вариант ответа - г).

Объяснение:

0,0(0 оценок)
Ответ:
piloyanmurad
piloyanmurad
23.01.2020 22:29

новейших технологий на ближайшее будущее и недооценивать их влияние на далекую перспективу. Но это не отменяет того, что экспертному сообществу, государству и бизнесу нужна «дорожная карта» развития инновационных отраслей в обозримом будущем.

Авторы ежегодного обзора рынка робототехники, который выпускает Сбербанк, обсудили со специалистами фундаментальные тенденции в этой области и в докладе за 2019 год представили 11 направлений, которые в ближайшие пять лет окажут наибольшее влияние на развитие робототехники в России и мире.

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