kotovayaanastasia2069
?>

Нарисовать три прямоугольника в нижнем левом углу прямоугольника

Информатика

Ответы

zeltos384
Вот вот так , тут не сложно
msk-academ
Вместо 20 можно подставить любое число, 20 соответствует m,n program new; var a: array [1..20,1..20] of integer; i,j,sum: integer; begin randomize; for i=1 to 20 do begin for j=1 to 20 do begin a[i,j]: =random(8)-15 end; end; for i=2 to 20 do begin for j=1 to 20 do begin sum: =sum+a[i,j]; i: =i+2; end; end; for i=1 to 20 do begin for j=1 to 20 do begin write(a[i,j]); end; writeln; end; writeln('сумма равна  ',sum: 8); end. p.s. делал без паскаля если какие то ошибки то пиши
Диана-Николаевна377
А) 1. может иметь структуру "сетка"     2. размещает файлы в представлении значков и иконок     3. является основным инструментом в начале работы б) 1. имеет дерево папок     2. дает инфо о ос компьютера при вызове контекстного меню     3. является программой по умолчанию в) 1. имеют только те документы, которые доступны отпред. пользователю     2. могут содержать любые типы файлов     3. зачастую стандартная директория сохранения файлов

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Нарисовать три прямоугольника в нижнем левом углу прямоугольника
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

des-32463
rashad8985
Sadikova Gavrikov
upmoskovskiy
Анатольевич-Лариса
bsi771184
alekbur
tatarinova-51
igevskoemuseumkec
Владимировна Екатерина
mmi15
Надежда-Андрей930
Vladimir
alapay
asviridova07194