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

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

konnovakat1
Белов_Лукина1339
ldstroy
krasnobaevdj3
Ярослав
zuzazuza61
prokodasha
Игорь Андрей
Волков1968
Александрович784
kate281078
cardiodoc08
savenko0109152
igorSvetlana547
Valentina1520