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*
Комментарий*

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

derkachn6429
Yelfimova-andrei
ivanrancev
Aleksandrovna Kolesnik1764
missbuhgalter2013
Valentina
Александрович686
alenchik19938823
Kozloff-ra20146795
mvv-155
Ladiga_Evgenii886
kenni19868
mashere59
kryshtall2276
Алексеевич949