Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Конспекты / Изучаем язык BASIC. Занятие 29. Печать элементов, находящихся над главной диагональю в виде треугольника.

Изучаем язык BASIC. Занятие 29. Печать элементов, находящихся над главной диагональю в виде треугольника.



Осталось всего 4 дня приёма заявок на
Международный конкурс "Мириады открытий"
(конкурс сразу по 24 предметам за один оргвзнос)


  • Информатика

Поделитесь материалом с коллегами:

Занятие 29.

Печать элементов, находящихся над главной диагональю в виде треугольника



Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся над главной диагональю в виде треугольника.

CLS

RANDOMIZE TIMER

INPUT “N=”;N

DIM A(N,N)

FOR I=1 TO N

FOR J=1 TO N

A(I,J)=INT(RDN*42-18)

PRINT USING “####”; A(I,J);

NEXT J

PRINT

NEXT I

FOR I=1 TO N

FOR J=1 TO N

IF I‗ ‗ ‗ ‗”;

NEXT J

PRINT

NEXT I

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся под главной диагональю в виде треугольника.

IF I>J THEN PRINT USING “####”; A(I,J); ELSE PRINT “‗ ‗ ‗ ‗”;

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся над побочной диагональю в виде треугольника.

IF I+J‗ ‗ ‗ ‗”;

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся под побочной диагональю в виде треугольника.

IF I+J>N+1 THEN PRINT USING “####”; A(I,J); ELSE PRINT “‗ ‗ ‗ ‗”;

hello_html_m1b85631c.png

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся в 2,3,6,7, сохранив их положение.

IF (IJ AND I+J>N+1) THEN PRINT USING “####”; A(I,J); ELSE PRINT “‗ ‗ ‗ ‗”;

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся в 1,4,5,8, сохранив их положение.

IF (I>J AND I+JN+1) THEN PRINT USING “####”; A(I,J); ELSE PRINT “‗ ‗ ‗ ‗”;

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся в 2,3,5,8, сохранив их положение.

IF (IN/2 AND I‗ ‗ ‗ ‗”;

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся в 1,4,6,7, сохранив их положение.

IF (I>J AND I+J>N+1) OR (IJ) OR(IN+1) THEN PRINT USING “####”; A(I,J); ELSE PRINT “‗ ‗ ‗ ‗”;

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся в 1,4,6,8, сохранив их положение.

Задан массив A(N,N), заполненный целыми числами в диапазоне [-20,15], распечатать элементы массива, находящиеся в 1,3,5,7, сохранив их положение.




























57 вебинаров для учителей на разные темы
ПЕРЕЙТИ к бесплатному просмотру
(заказ свидетельства о просмотре - только до 11 декабря)


Автор
Дата добавления 23.09.2015
Раздел Информатика
Подраздел Конспекты
Просмотров110
Номер материала ДВ-004698
Получить свидетельство о публикации
Похожие материалы

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