Есть ответ 👍

Сивт. заранее ! все в qbasic 1) дан массив а(8) -6.4; 5.6; -0.1; 46.7; 7; -3.8; 0.23; 6 а) сформировать массив в , каждый элемент которого вычисляется по формуле в(i) = a(i)*5 вывести на печать элементы массива в в) вычеслить произведение масивов а и в с) вывести на печать пятый элемент массива а и первый элемент массива в. - все три заднтя объединить в один алгоритм. 2) ввести четырехзначное число. есть ли в нем одинаковые цифры?

185
483
Посмотреть ответы 2

Ответы на вопрос:


№1 cls dim a(20), b(20) data -6.4, 5.6, -0.1, 46.7, 7, -3.8, 0.23, 6 for i = 1 to 8 read a(i) print i, a(i) next i print "" for i = 1 to 8 b(i) = a(i) * 5 print i, b(i) next i print "" for i = 1 to 8 print i, a(i) * b(i) next i print "" i = 5 print i, a(i) i = 1 print i, b(i)   №2 cls input "vvod a"; a c1 = int(a / 1000) a = a - 1000 * c1 c2 = int(a / 100) a = a - 100 * c2 c3 = int(a / 10) c4 = a - 10 * c3 s$ = "no" if c1 = c2 then s$ = "es" if c1 = c3 then s$ = "es" if c1 = c4 then s$ = "es" if c2 = c3 then s$ = "es" if c2 = c4 then s$ = "es" if c3 = c4 then s$ = "es" print s$, c1, c2, c3, c4

4*8+7 = 39 (в десятичной) 39/16+39%16 = 27(в шестнадцатеричной) ответ: 27.

Популярно: Информатика