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

Элементы двумерного массива а размером 10х10 первоначально были равны 1 , затем значения некоторых из них меняют с следующего фрагмента программы for n: =1 to 4 do for k: =2 to n+1 do begin a[n, k]-1; a[n, k-1]: = a[n, k]-1; endсколько элементов массива в результате будут равны 0?

Показать ответ
Ответ:
Настя3546955
Настя3546955
04.08.2020 14:26
Var a: array[1..10, 1..10] of real; i, j, k,n,r,t: integer; begin  Randomize;  for i := 1 to 10 do begin for j := 1 to 10 do begin    a[i, j] := 1;    Write(a[i, j]:4);    end;Writeln;end;Writeln;Writeln;for n:=1 to 4 dofor k:=2 to n+1 do begin//a[n, k]-1;a[n, k-1]:= a[n, k]-1;end;
for i := 1 to 10 do begin    for j := 1 to 10 do begin      Write(a[i, j]:4);    end;Writeln;end;
end.

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