Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Конспекты / Изучаем язык BASIC. Занятие 29. Печать элементов, находящихся над главной диагональю в виде треугольника.
ВНИМАНИЮ ВСЕХ УЧИТЕЛЕЙ: согласно Федеральному закону № 313-ФЗ все педагоги должны пройти обучение навыкам оказания первой помощи.

Дистанционный курс "Оказание первой помощи детям и взрослым" от проекта "Инфоурок" даёт Вам возможность привести свои знания в соответствие с требованиями закона и получить удостоверение о повышении квалификации установленного образца (180 часов). Начало обучения новой группы: 24 мая.

Подать заявку на курс
  • Информатика

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

библиотека
материалов

Занятие 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, сохранив их положение.


























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

Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ

Похожие материалы

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