Решения задач на языке программирования Turbo Basic

Задание № 1
1.1 Постановка задачи
Имеются четыре A, B, C, D произвольных числа. ЭВМ должна ответить на вопрос: Правда ли что первое число самое большое, а последнее самое маленькое?
1.2 Блок - схема
да

1.3 Исходный текст программы
CLS
INPUT “Введите четыре числа:” A, B, C, D
К = 0
IF A>B THEN К= К+1
IF A>C THEN К= К+1
IF A>D THEN К= К+1
IFD<А THENК= К+1
IF D<B THEN К= К+1
IF D 0 THEN n = 1
NEXT I
PRINT n
END
Задание №4
4.1 Постановка задачи
Составить программу вычисления числового ряда для известного числа членов ряда N. Перед программированием следует выявить и написать необходимые аналитические соотношения. Y=(2־¹/27+4)(2²/9-8)(2־³/3+16)(24 /1-32)…
4.2 Блок - схема
4.3 Исходный текст программы
CLS
INPUTn
y = 1
x = 27
FOR I = 1to n
y = y (2^ (((-1) ^I)*I)/x+ (-2) ^ (I+1))
x = x/3
NEXT I
PRINT y
END
4.4 Пояснения
Участвующие соотношения:
{y = y(2^(((-1)^I)*I)/(-2)^(I+1)) y = 1
{x = x/3 x = 27
Задание №5
5.1 Постановка задачи
Определить является ли целочисленная матрица размером 4x4 симметричной относительно главной диагонали
5.3 Исходный текст программы
CLS
DIMA (4, 4)
FOR I = 1 to 4
FOR j = 1 to 4
INPUT A (I, j)
NEXT j, I
FOR I = 1 to 4
FOR j = 1 to 4
IF I<>j END A (I, j) = A (j, I)
NEXT j, I
IF K = 12 THEN PRINT «Матрицаявляетсясимметричной»_
ELSE PRINT «Матрицанеявляетсясимметричной»
END
5.4 Пояснения
А (1;1) А (1;2) А (1;3) А (1;4)
А (2;1) А (2;2) А (2;3) А (2;4)
А (3;1) А (3;2) А (3;3) А (3;4)
А (4;1) А (4;2) А (4;3) А (4;4)
Матрица будет симметричной относительно главной диагонали, если:
А (1;2) = А (2;1)
А (3;1) = А (1;3)
А (4;4) = А (1;4)
А (3;2) = А (2;3)
А (4;2) = А (2;4)
А (3;4) = А (4;3)

Внимание, отключите Adblock

Вы посетили наш сайт со включенным блокировщиком рекламы!
Ссылка для скачивания станет доступной сразу после отключения Adblock!

Скачать полную версию

Рефераты по информатике Задание № 1 1.1 Постановка задачи Имеются четыре A, B, C, D произвольных числа. ЭВМ должна ответить на вопрос: Правда ли что первое число самое

Оценок: 351 (Средняя 5 из 5)

Специалисты RetsCorp работают в digital-сфере более 7 лет. За это время мы разработали более 500+ успешных проектов. Основываясь на своем опыте и знании рынка, мы с уверенностью можем сказать, что будет работать, а что — нет. Заказывая создание лендинга для бизнеса в нашей студии, вы получаете работающие решения, необходимые именно вашему бизнесу.

Сотрудничая с нами, вы будете не клиентом, а нашим партнером. Благодаря этому мы будем развивать ваш бизнес как собственный. Мы так же как и вы заинтересованы в успехе проекта, поскольку ваша успешность будет нашей рекламой.